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EEBRUit^ERS CLUB 



een club van 6502 
aebruikers 



Het doel van de vereniaina is: het bevorderen van de kennisuitwisselina 
tussen de aebruikers van 6502-co<riDuter5, zoals KIM, SYM, JUNIOR, fiiM-65, 
SYSTEI^ 65, "ftCORN, PET en CBM, APPLE, CHE-1, ftTftRI, de Proton-comDuters, 
ITT 2020, PEflRCOM, PC-100, OSI, BBC, VIC-20 en COMMODORE 64, BASIS 108, 
POLL AS, SBC 65/68, FORMOSA, enz. 

Deze kennisuitwisselino wordt o- a. aerealiseerd door viifmaai oer jaar 
DE 6502 KENNER te Dubliceren, viif maal oer laar clubai.ieenkomsten te 
houden, een cassettebibl iot heek m stand te houden en paoerwa re-service 
te bieden. Daarnaast oroaniseren de leden zelf regionale bi.ieenkomsten. 



Verschi jninasdata 
DE 6502 KENNER 



Bi jeenkoMsten 
van de club 



derde zaterdag 
van de fYiaandens 
februari 
(Tiei 

auaustus 

oKfcober 

december 

Regio Den Haag/R^dam e. o. 

Inl. Gerard van Roekei 

v.d. Palmstraat 11-C 
3135 LK Vlaardincen 
Tel. s 010 - 351101 



derde zaterdag 

van de rviaanden! 

lanuari 

flftaart 

mei 

seotember 
november 

Regio Arnhem e. o. 

le en 3e Ma-avond v.d, maand 
in HET DORP 

(zaal wordt aancegeven in de 
hal van de oersoneelsf lat ) 
Inl. s Henk DeutekojYi 

Tel. : 08303 - 8937 



De KIM GEBRUIKERS CLUB NEDERLAND is een volledig onaf hankeli iKe vereni- 
gino met statuten en een bestuur. De club is ingeschreven bij de KaiY»er 
van Kooohandel en Fabrieken voor Hollands Noorderkwart ier te Alkitiaar, 
onder nuwmer 634305. 

Samenstellina van het bestuur is tnans als volgtJ 



Voorzitter ! 



Erevoorzitter: 
Sekretariss 



Penn i na weest e r s 



Ledenadm i n i st rat i e s 
Redaktie DE 6502 KENNER 



Accomodat ies 



Ereledens 

Ad res van de verenigings 
L i dmaat schapoen : 



Ad ve r t ent i et a r i even s 



Dageli .iKS tjestuur: 
Rinus Vleesch-Dubois 
Fl. Niaht inaaiest raat 
2037 NG Haa'rleffi 
Sieo de Vries 
Ruud Uohoff 
Voorburopad 10 
6843 EM Am hem 



212 
(023 



(085 
(19.00 

Riet Uohoff - Burahoorn ' 
voor adress zie bij sekretaris 
L eden I 

Tfuud Uohoff (zie bii sekr. ) 
Willem L. van Pelt 
Jacob Jordaensst raat 
2923 CK Krimoen a. d. 



30993) 



- 816935) 
- 20.00 ) 



15 

IJssel 
(01807 



- 19881 ) 



Riche A. van Steen 
Vinaerhoed 11 
6935 BZ Dieren 

Mw. H. de Vries - Van der Winden 

Anton Mueller 

zie adres sekretaris 

F1.45,= per kalenderjaar, oostreke- 

nina 3757649 t.n. v. KIM Sebruikers 

Club te Arnhem 

Oo aanvraag bij de redaktie 
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kenme:r 



DE 6^ KSiiit is een 
uitgave van de KIP! Bebrui- 
kers Club Nederland. 

ndres voor het inzenden 
van en reakties oq art ike- 
len voor K 002 KENNES: 

Uillee L. van Pelt, 
3mk JIftteisstraat 15, 

2923 CK mm m m 

IJSSEL. 

Tel. s 01807 - 19^ 

Redaktie DE 6502 KEN^ER: 
V^stt aeiteNef kefss 

Uilleft van Pelt 
Serard van Roekel 
Frans S«eehuijzen 

Jaap van Toledo 

Freelanee tideiiefkers: 

Renee de Hood 
Fridus JonkAan 
HefUfi Mwfmimwpf 
flnton Mueller 
Koen van Nieunenhove 
Efiin liiseeuM 

6ehele of gedeeltelijKe 
ovirna«e van de inhotid 
van DE 6502 KENNER zonder 
toestentting van het be* 
stttur is verboden. Toepas- 
sing van aeoubliceerde 
orograMa's, hardHare etc. 
If liliiA toegiiUan voor 
persoonlijk gebruik. 

W ^2 KeWER verschijnt 
5 X oer jaar en heeft een 
oplage van 500 exeaplaren. 

Cooyright (C) 1983 m 
Bebfuikfrs Club Nederland. 

De voorpagina is een aqua- 
rel van een KIN, ojeschil- 
derd dtori 
Rims Vlfiscft Dubois 



IfiiHOlH)S0PMVE DE 6502 KE^R NR. 28 Wmm WM 
U Van het bestuur 

2. flaenda 

3. UITNODieirffi Ledenvergadering/Clubbijeenkoisi lliersf oort 

4. CasstitebibliofMk 

5. Van de redaktie 

6. Boekeninfomatie 



7. CoiModore nieuirs 
Aoole nieuNS 
ftloeieen nieuws 

Ti jilsciirift«i nieuns 

8. !»licro-ftDE 

...Printer on/off CDfli«and door fldri Hankel 
...6K source hstina voor JliWOR 
...Kicro-flDE error disDlay door Phons Bloeien 

9. H.C.C.-Dagen (LET OP REDUCTIEBOM OP P(©. 1? 0 

10. Elektuur 16K Dyna/ftische RAN-kaart 

... ingeionden brief door Dirk Picfese 

IL Srafisch Disolav voor JUMOR 

... Sraficos wet eioen 16K en kristal door H.Crtristen 



2. 
3. 

7. 

5. 

3,4 7* 

3. 
& 

s. 

4. 

5. 

6. 

5. 
6. 



12. Vraac en aanbod 3,6,37,40,45. 

13. ftI«-65. Een Flopoy-Disc aan de ftIW-65 ' % 
...door D.A. terri^psi 

14. FORTH. Using FORTH with the ^2 15. 
...door Gerard van Roekel 

15. BASIC. 

. ..l*ticro5oft Basic Routines door Ruud Uahoff 22. 

...Dec/Hex Tabel door Jaao van Toledo 40. 

...Uitgebreide 6502 Dlsasseibler door Serard van R^i^kel 46. 

16. Balgje 27. 
...door D.?1. Verzi.jCen 

17. m-\. Hexduft 33. 
..«door Frans Smm^zm 

It. Marktlnfo 40. 

19. iffiR - routines (Co«inentaar op Fairtuur/Pilcbcm, editie 26y 4^. 
...door Ruud liohoff 
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VOOR ELK UAT MILS 



fimk ziJ de iedenerRlnf van em MirUt l^den is m mmWik mmim m verzaneiiM mm\ 
bruikbare routines uit "MicnDsoft basic" te lichten en die voor U kort te beschriiven. Zie elders in 
dit nuttier. De coMPiete inforuatle bliaft in MiJn faezitizodat Ik aitiJd in staat zat ziJn anderen te 
heipen in 9eval van probteien «et SiilihliiiH^PftteTS. !^ sedttaiieerde infornatie mm lint- 
zawerhand een drieta! dikke ordners. De basis vorMt, de bii serieuze PET/CBM bezitters overbekende 
disassembler listing van Dik Grooti voorzien van uitstekend coinentaar. flis Je dan daarnaast beschikt 
over slMPele dlsi^iMHer afdriiiaceQ van indere ttachlneSf tiordt de rtst een f iuit^e em twu Op dit 
mmmt beschiK Ik over AavoiMiA basic inteFPreterss 

FET-2M1 Bit Mm* ikmmm wk iedeliiieerd conMentaar. 

CBM-3!!32 Dik Groot. Voorzien van sedetaileerd coftwientaar 

KirH(B.9 De KIH basic (patches van S.Moldrinshi H.Otteni K.v.Nieuwenhove). In sebruik op KIH en 

Dior's. M mm m Hans Qtteii voor de afdruk. 
Junior 8e die door fyitse f iria nordt wmKiHl. Draait qp een aanui Junior's. 

DPaESQFT m mm mmmm %mit m de mm. Zetf afsednrtct op de MI. 

CiH4 De CoMttodore-&4 listing leeft ook (biJna) aiie inforwatie over de VIC-20. fliieen de 

sonioietrisc^^ functies van de VIC staan op totaai andere adressen. Vandaar die lese 

Piekken eiders In dit miiMir. List ins van ftnton Muelter. 

Dan biiJven er nos twee beiansrijke versies over die voorzover ik weet ook op een aantai Juniors 
en natuurtiJk op de sijiteien vin herkonstt in sebmiK 9aaro« ttijn vraas* 

UIE HELPT HIJ m flFDRUKKEN VflN AIH-E5 EN SYR ? Hocht U een van di^ mmm mmm Hit i 
hebt nm primer of em disisse«bteri nee^ <i^n toch e^ omtact tet te op. lie vinden besltst ml 
een opio^lne. 

Veei s^ftnarei zoais Patches en IM-routlnes ziin iet beNtiP van deze sesevens aan te pi^s^ mm 
andere vetiies* 

Een heelander lebeuren betreft voorlopis alleen de ftPPLE-bezitters. Interesse in COMflL ? Het 
bleek iftoselijk ftPPLESFT te bei*erken van BASIC naar een redeliike COMftL interpreter. U ftwet natuurliik 
seen i»nderen vemachtentiiaar het resuitaat is toch de aanNerisheid van controlstructuren 

IF-THEN-ELSE-ENDIF 
yHILE^)0:-ENDHHILE 

REPEftT-UNTIL 

FOR-T(hSTEP-l€XT (Dat was er al) 

CflSE-H«EN-0THERUISE-€N)OI^ 

EXEC:-PROC-ENDPROC 

GOTO-lflBEl: 

Voorst is de dwang tot gestructureerd prosraMieren aanwezis ! Het seheei staat in de lansuase 
card (»t aansepast dos 3.3 dat wet s-files i.P.v i-files (inteser) iierkt De cotiando's ter 
OftderstiiilllM im di hish resolution graphics Moesten daartoe verdni jnen. Niet zo ersitwint hier werd 
vanwese de traasheid van de interpreter toch neestai naar nachinetaai ovefeeeaan. Geinteresseerden 
kannen contact fiiet aii opnetten. 



Ruud UPhoff 
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Zft 15-10-83 VERSCHIJNINGSDflTUW DE 6502 KEIOER 

Zfl 08-10-82 REGIONflLE 6SXX BIJEENKOMST 

CLtfiWIS DE BOSKANT, UILEBOi€N,OEN Hflfl6 
Inforiatie: G. van Roekel Tel.OlO-SSllOl 



m 

DI 
HO 
DO 



17- 10-82 ROBOTICA - ANTiEiiPEN 

18- 10-82 MtMCeiTRUN .EM CREST HOTEL 

19- 10-82 . TUEEDE BEL6ISCHE LRSUEEK 

20- 10-82 . BENELUX ROBOTtfiUTDmTIOh 

. yORKSHOP ON INDUSTRIAL 
APPLICATIONS OF INAE 

M.i S.T.I. in Antiferoen 
tel. : 03/2385174 



NA 

DI 

ie 

DO 
VR 



17- 10-82 

18- 10-82 
13-10-85 
20*10-83 
21-10-83 



SYSTEKS 83 - HUNCHEH 
HESSEOELANOE INT.SSSiS CimtTERS. 
Ifil.s UNA in tttmchen 
Tel.* (85) SI070 



ZA 2trl0-82 HCC-DA6EN IN DE JAARBEURS 
TE UTRECHT 

KOH ONZE CLUB MET UW AANHEZIS- 
f€ID VERTEKMfflORDISEN ! 

li ihld^ COMDEX EUROPE - A' DAM 
DI 25-10-82 TUEEDE AMERIKAANSE 
W) 26-10-83 OWPUTER - VAKBEURS 
DO 27-10-83 Inl.: Interface A' dai 
Tel. S020 - 460201 

01 25-10«3 MI0WBRAFIE 83 UTRECHT 

yO 26-10-83 DERDE BEURS IN DE JAARBEUK 

DO 27-10-83 Ini.s Jaarbeurs Utrecht 

DO 27-10-83 ^ - IPiipiiS^ E^E D^^^^ 

Zft 19-11-83 KIMaUBDAG 

VOOR fiS>2 6EBRUIKERS EM ANDEIO 

DO 24-11-82 65® - SEBRUIKERS6R0EP E-CAFE DELFT 

m mmm mmmti mtmmmmsif 

CLUBHUIS DE BOSKANT, UILEBOWEN, DEN HP.AG 
Inforeatie: 6. van Roekel, Tel. 010-351101 

ZA 17-12-82 VERSCH1JNIN6SDATUM DE 6502 KENNER 

m 11-02-84 REGIOflALE 6S»I BI^JEEIKOIST 

CLUBHUIS DE BOSKANT, UIlEBOWEN,DEN HAAG 
InforaatiesG.van Roekel, Tel. 010-351101 

Zfl 07-04-84 RE6I0NALE 65XX BIJEENKOMST 

CLUBHUIS D£ BOSKANT, UILEBO^EN.DEN HftftG 
InforAatie:6.van Roekel, Tel. 010-351 101 

ZA 09-06-84 REBIONALE 65XX BIJEENKO«ST 

CLUBHUIS DE BOSKANT, UILEBOMEN.DEN HAftG 
Info raatiesG. van Roekel, Tel. 010-351 101 



Ie(tere le tn 3e Na-avond v.d. maand in NET DOIS^s 
RESIOWIE 65XX BIJEEi^OMST 
zaal wordt aanaeQeveti in Hal oersoneels- 
flat 

InforMties HenR Deuti^oi, Tel.0S3Q2-fi987 



's Zondags vanaf 19.10 uur via Hi Iversum 2 
Hobbyscooo, vaak aet conouterorooraAAa's, die 
A.b.v. een cassetterecorder zi.in'oD te nemen. 
Door het qebruik van 'Basicode^ is elk uitqe- 
zonden Drograii«a Met Um coADuter in te lezen. 
De Basicode voor de OS! en voor de APPLE II 
zijn geoubliceerd in de HCC-Nieuwsbrief nr. 34 
van nov/dec 1981. 

De Basicode voor JUNIOR is oeDubliceerd in 
editie 23 van DE 6502 KENNEft, oktober 1982. 
Het Droaraiina voor de JUNIOR is verkriig^aar oo 
JUNIOR cassette 2 (alle oroaraAffia's daafoo voor 
Fl. 12,50, of een listing voor Fl. 5,00 door 
het betreffende bedrag over te schrijven oo Piet 
Dostrkeninanr. 841433' t.n. v. U.L. van Pelt te 
KriAoen a.d. IJssel, eet verAelding van hetoe^ 
wordt verlangd. 

^;0S BfiSICDD£-2 BO£K TE KQOP PUK-IKflTIES fET UW LAY-OUTS 



Blijkens Aededeling van de 
WB^ de Nederlandse OAroep 
Stichting te HilversuA, is 
sedert enioe tijd het Basi- 
code boek 2 te verkrijgen. 
Het bcek bevat alle inforaa- 
tie, listings en protocolien 
die totnoqtoe door leden van 
de 3asico3egroep voor. Habby- 
scoop zijr: ontxiikkeld. 
Het 5asicode-2 boek zal ge- 
sc^ikt Zijn vocr de voigen- 
dc* corfcputers: h?PL£, Coaao- 
c'ore - PET 2001, CBW 3008, 
3015, 3032, 4016, 4032, 8032 
8096, VIC-20 en CoAAodore 64 
DhL EXIDI Sorcerer, OSI,BBC 
Philips 2000, SWTW:-6B00, en 
T,RS-80 Aodel 1 en 3, en di 

80 K en ft. 
Voo?' al deze coAouters zal 
een vertaalprooraaAa oo een 
cassette zijn woegevoegd.Ook 
KOAer. 00 ce bi igevoegde cas- 
sette een groot'aantal "voor 
beeld''oro9raAAa'5 voor. 
Via de oost kost het boek en 
de cassette F1.25,— , te be- 
stellen via postgiro 1419, 
t.n.v. Rig. Sekretariaat NOS 
in HilversuA onder vereel- 
dingr Basicodeboek - 2. 

Voor de JJNIC?? is het BASI- 
CODE prograAAa geoubliceerd 
in edltii 23* Het is oa band 
bi5(^liyyi#« zone! ats op 
papier. 

Junior-caswtte nr. 2 F. 12,50 
Listing Basicode ! F. 5,00 
Heb betreffende bedrag over- 
schri'ven oq postrekening nr 
341435 t.n.v. W.L. van Pelt 
te KriApen a.d. IJssel, of 
op oostgiro 3050 van de A«RO 
bank te KriApen a.d. IJssel 
t.g.v. W.L. van Pelt, bank- 
rekenino 44. 1 1, 06.471. 
VerAeld^ duidelijfc fietffeen 
Qenenst wordt. 



Erwin Rosseeuwj Begoniapark 7 
3 39S1 Westouter(Heuvelland) 
Belsiet Nil sraag lay-outs 
waken voor uw te Publlceren 
hardware. Meer inlichtinsen 
biJ de redaKtiesekretaris. 



net is *OAenteeI ongeveer 
eer, jaar celeden dat Coaao- 
uG ^e'als eiqer. organistie oo 
c'e Nederlardse Aarkt aktief 
'4teTC, Het bedrijf houdt zich 
^rlet alleevi professioneel 
beiig -tiet de verkooo van 
'laar pradukten, fsaar ook aet 
oi^dei'steaning, i^forAatie en 
stiftulerinc van de toepas- 
siigsAogelljkhecen van de 
coAputer. In Jiet verleden 
flnde<*hielt' CoAnrodo'^B nau>*e- 
lijks kcntakten «et coaauter 
c'Ii!}'i, Dco:^ het goede werK 
van die clubs en" oositieve 
irrvloed op het coA^uterge- 
b-^uik j^enst CoAAOdore *de 
banden Ael Mito: te verste- 
viger.. 

fildus een Aededeling van Coa 
^fcdore, die haar gdede be- 
daeling weteet^ waar Aaakte 
deer het uitschrnven van 
een wedstrijd. Dit feit werd 
de redaktie bij toeval be- 
kend. Een teken dat Comaodo- 
re nog niet geheel oo de 
hocgte was van het bestaan 
van de oudste coAouterclub 
in Nederland! de KIK Sebrui- 
kers Club. Reden dus oa het 
bedrijf te kontakten en te 
verzoeken oa de band Aet on- 
2B club te pikken. Een en 
ander is door CoAAOdore toe- 
oezegd, I4ij zijn benieui*d of 
deze belofte ingelost wrdt. 
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KEMIvJER 



DE 6502 KENNER 



24Q8S3 PA6E 01 



OOlOl 
0020 > 
00301 
00401 
00501 
0060 s 
00701 
00801 
0090 « 
OlOOs 
01101 
0120J 
0130: 
0140: 
0150: 
0160: 
0170: 
0180: 
01901 
0200; 
0210! 
0220! 
02301 
0240! 
02501 
0260: 
02701 
0280 1 
02901 
03001 
0310: 
03201 
03301 
03401 
0350! 
03601 
0370! 
03801 
0390! 
0400 1 
04101 
04201 
0430! 
04401 
0450! 
04601 
0470! 
0480 1 
04901 
05001 
0510! 
05201 
0530! 
05401 
0550! 
05601 
05701 
05801 
0590! 
06001 
0610! 



» PftTCHES ON MICRO-flDE (JUNIOR-VERSION) 
« 

ADR I HANKEL 
W. KLOOSSTRflflT 32 
7606 BB ALMELO (THE NETHERLANDS) 
Phone: 0S490 - 51151 



* BY : 
# 

» 
#■ 
m 

* 60AL: 
« 

« 

♦ 
* 
* 

« 

♦ 
* 

* 



EXPANDING M.A. WITH PRINTER ON/OFF COM!»IAND. 
BY INSERTING (ASCII = $5E) A SOFTWARE 
FLIPFLOP WILL B£ SWITCHED. 

IN THE NEW OUTPUT-ROUTINE WE EXAMINE WHETHER 
PRINTING ON PRINTER AND VDU IS DESIRED. OR 
ON VDU ONLY. 

THE ADDRESSES USED HERE ONLY REPRESENT THE 
MEANING THAT THIS SOURCE COULD BE PLACED ON 
FREE MEMORY AREA INSIDE OR OUTSIDE M.A. 
IF USING AREA FROM $4000, DON'T FORGET 
MODIFYING $2EA3 ETC. IF NEEDED. 







53 


16 


PRNTER 


* 


$1653 


■ 


SEE PRINT-ROUTINE IN Dk 6502 






34 


13 


PRCHA 


* 


*1334 


■ 








05 


lA 


FLIFLO 


* 


$1A05 


• 








31 


20 


MAW 


« 


«2031 


• 

* 


WARM-START ENTRY M.fl. 


2000 








* 


0R6 


$2000 






2000 


4C 


50 


41 




JiP 


EX INI T 


• 


FLIP-FLOP RESET 


37CF 








« 


om 


♦37CF 






37CF 


4C 


5& 


41 


« 


JMP 


SWITCH 


• 


CHECK FOR 


2EA0 










ORG 


«2EA0 






2EA0 


4C 


6A 


41 




JMP 


NEWOUT 


• 


NEW PRINTER OUTPUT-ROUTINE 


4150 








« 


ORB 


»4iS0 






4150 


A9 


00 




EXINIT 


LDAIM 


$00 


« 




4152 


60 


05 


lA 




STA 


FLIFLO 


■ 




4155 


4C 


Ef 


3C 




JMP 


«3CE9 


• 


DO WHATEVER THE^ WAS 










• cirrm.-p is 


CHECK! N6 


FOR $10 


4158 


C9 


5E 




SWITCH 


CMPIM 








415A 


FO 


03 






BEQ 


CGNA 






415C 


4C 


CO 


20 




JMP 


*20C0 




CONTINUE IN MAINLINE 


415F 


AD 


05 


lA 


CONA 


LDA 


FLIFLO 




FETCH FLIPFLOP 


4162 


49 


FF 






EORIM 


$FF 




SWITCH 


4164 


6D 


05 


lA 




STA 


FLIFLO 




SAVE IT 


4167 


4C 


31 


20 




JMP 


MAW 







KENNER 2b 



416A 48 
416B AD 05 
416E FO 05 

4170 68 

4171 48 

4172 20 53 

4175 68 

4176 4C 34 



lA 



16 
13 



NE*«3UT PHA 
LDA 
BEQ 
PLA 
PHA 
JSR 
PLA 
JMP 



NTX 



FLIFLO 
NTX 



PRNTER 
PRCHA 



SAVE CHARACTER 

WHAT STATE UF FLIPFLOP? 

VDU ONLY 

CHARACTER BACK AGAIN 
AND SAVE IT 
PUT ON PRINTER 
CHARACTER BACK 
TO VDU 
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In editie 27 hebben mI.i een artikel oepubliceerd tet als 
titel : "KIPPELING VAN JUNIOR flflN 8" flOPPV. De auteur, 
Koen van NieuMenhove uit Leuven, heeft daarln laten Meten 
dat het systeei op 8' drives kon werken in single-density 
en op 5" drives in double-density. Sedurende de tijd dat 
aan het disk operating systea werd ge«<(erkt, had rotsvast 
de overtuiging dat op 5' in double-density kon Morden oe- 
gedraaid zich verheven boven ce noodzaak voortdurend in''t 
oog te houden dat de Merkelijkheid van de elect ronica-coa- 
ponenten zich niet altijd laat voorschrijven Hat de fanta- 
sie en de hoo? bedenkt. Eenvoudiger gezegd: toen de expe- 
riitentele controllerkaart in Leuven 'op aijn Junior Merd 
aangesloten, bleek al sooedig dat er iets niet klopte. Ik 
zal de lezer onthouden van de nachtelijke soanninoen die 
bijna letterlijk door de kelen aierden, tot het uitvailen 
van de gehele Leuvense elect riciteitsvdorzienina toe. Dit 
laatste schijnt echter een foraidabele, toevallioe saaen- 
loop van CAStandigheden geweest te zijn. Een week later 
zat ik weer in Leuven. oindat toen aebleken was dat de con- 
troller FD 1771 niet de vereiste WPM produceert t,b.v. de 
zgn double-density, aaar mel single-density ooievert. flch- 
teraf bedenk je dan dat het toch tevoren bekend kon zi^in. 
De hierboven verneldde redenen verhinderden dat echter. 'Na 
enig experi«enteren zijn Koen en ik naar Kriioen a.d. IJs- 
sel, de ^achmekaoter van de redaktie. afgereisd en hebben 
daar dolle uren gemaakt oa nop dat week-end de zaak rond 
te krijaen. 

Het disK operating systeA van Koen van Nieuwenhove draait 
nu. Single-density Neliswaar, Aaar dus ook geschikt voor 
5" drives aan de Junior-coAOuter. Het systeei is voorbe- 
reid oa saAen te werken Aet Basic, de asseAbler/texteditor 
van .Closer en Pascal. Pis u een en of Aeerdere van deze 
prograwAa's hebt gekocht, dan ooenen zich de ooorten tot 
een groot gebruikersgeniak. De Aarkt wordt oo dit AOAent 
voorzien van redelijk qeprijsce disk-drives, ook 8". Voor 
de spaarzaAe hobbyist is derhalve snellere file-bereikbaar 
heid geen onhaalbare zaak Aeer. Het is fCMef iMi^ ilR ti 
bevelen te werken Aet twee drives. 

Op het AOAent dat dit geschreven wordt Aoeten nog een aan- 
tal zakei^ worden bijgesleoen oa de lAoleAentatie'oo andere 
Junior-coAputers Aogelijk te Aaken, zo Aen Aet dit systeeA 
^il werken. In de eerste plaats Aoet Aen zelf een oplos- 
slno vinden oa de oo de adresbus aan te sluiten euro-con- 
troilerkaart te fabrieken. Wij willen oroberen daartoe een 
foto-positief/negatief ter beschikking te stellen. De Aa- 
nier waarop de software beschikbaar koAt lijkt een kwestie 



van eproAs af leveren tegen een vertjoeding waarin eniae ri- 
sicodekking is inbeprepen. De docuientatie, w.o. source- 
listing Aet in het Engels voorziene coAAentaar en de rest 
van de docuAentatie is in principe wel coApleet, Aaar deze 
is nog niet geheel logisch opoebouwd. Pnders oezead: we 
St reven naar een Aooi pakket, een volledig en iot "in de 
details inzichtelijk stuk oereedschap, een faciliteit voor 
de club, dat net zoveel enthousiasAe ontAoet als «icro-W)E 
Over Hlcro-PDE gesproken: Koen van Nieuwenhove wil napaan 
of dit aan de D.O.S. gekoppeld kan worden, evenals FORTH. 
Hij zoekt daarbij echter wel de steun van Aensen tfit iU»f- 
van verstand hebben en Aet zijn systeeA werken. 
De ontwikkeling staat niet stil. N'auwelijks heb ik ah dit 
systeeA aangeschaft, of Koen is voor Aij al weer bezio een 
nieuwe controllerkaart te Aaken Aet als opdracht: Aaak een 
kaart op basis van de bestaande software waamee wel in 
double-density kan worden gewerkt. flls het lukt zim er 
dus twee Aogelijkhedens single-density en double-density. 
Wat dit laatste oetreft: er is nog oeen incicatie van de 
kosten. Voor single-density Aoet u rekenen oo ca. F1.250,= 
inch Fl. 118,50 voor de bij DIL in voorraad ligcence con- 
troller FD 177!, echter exclusief de zelf te Aaken kaart 
en de aan te schaffen eoroAs en software en excluiief dt 
kosten voor de docuAentatieset van ca. F1.100,=. 
De belangstelling voor het werken oo floopy-nivo is groot. 
Er bestaan ook systeAen voor andere coAOuters en andere 
systeAen voor dezelfde Junior. Wii publiceren daarover nog 
Aeer. Bovendien wordt de landelijKe veraaderino voor een 
deel gebruikt oa de leden te inforaeren'over dit onderwerp 
en over de toskoAstice ontwi^kelinaen ervan. Het is aan te 
bevelen met overhaast te beslissen, Aaar weioverwoqen. Ik 
stel daaroA voor eerst kennis te kOAen Aaken Aet het D.O.S 
van Koen van Nieuwenhove en de daarbij behorende paoier- 
winke!. Wen is van harte welkoA, vooral als aen teoelijker 
tiid noG even wat zelf ontwikkelUt ^fttnyt mitimkA voof 
publikatie in DE 6502 KEMNER. 

fils ik nu ook nog even laat weten dat ik Aet eiaen ogen 
bij Roger Langeveld in Voorburg een Junior op een 66 'ca 
beeldbuis in kleur heo gezien, dan is Aijn overtuioino dat 
c^e leden van cnze club in staat zijn uit hun coAouters te 
Halen wat zij bi : de aanschaf ervan niet hedben durven 
dfOien toch {^recnlvaiiilifpL 



MillM L van Pelt. 



M C E - D ft e E N 21 22 DKTOBER 1983. 

De aebruik^lljliif HCONB#0#lii worden od vri idaa 21 en zat-^rdaa 22 oKtooer 
1983 gehouden ii^i d» Jmmrbeur^ te Utrecht. 

Onse club hooot dB&r aanwezig te kunnen ziin lYiet veel enthousiaste le- 
den, net als voorgaande jaren. Heeft U belanast ei 1 ma de club te hel- 
pen tttet het oobouwen van de stand of er met Uw svsteem een bj idraae te 
leveren aan het representeren van de club, bel aan even met voorzxtter 
:LSSJkiSrKa4^^Silt; '='23-330993 of 085-616935. We he:,ben Uw 

JaarvMr^acf^ring 1983. 

Het verslag van de oenninqiYieester over het laar 1382 is oeDUbliceerd 
in DE 6502 KENNER nr. 27, de editie van auaustus 1983. Neeiytt U deze 
editie mee, als U de jaarverQadBrina besoekt. 
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ELEKTUUR 16-K DYN,Rfl« KflAST. 

iBipt iifl f lite 

Dize kaart is beschfivevi in 
j^ridttur nr. 222, biz. 50 e.v. 
Een Mijziqing hieroo Merc! be- 
schreven in Elektuur nr. 230, 
biz. 79 en 80. 

Het nadeel van deze kaart. 
voor aij tenninste, was dat 
deze inclusief de genoeAde 
Mijzxginoen niet betrouMt^ar 
Nerkte. 

Van vrienden hoorde ik va^^ 
de volgende wijzigincen, wel- 
ke er bi.j ftij voor zorgden, 
dat er nu drie dyn. Rai» kaar- 
ten naar tevredenheid werl<er!: 

1) Waak de orintwijzicing 20- 
als beschreven in Elektuur 
nr. 230, ongedaars (heretel 
het doorgesneden orint- 
sooor). ^ wmiM!mm§t'' 
bindingen focaer blijven 
zitten, dat kan lek^t geen 
kMaad. 

2) Verwijder draadbruc 1 - T 

3) Verbindt 1' «et oen 29c 
van de connector, dit is 
R/«. 

4) C 5 Mas 120, wordt 470 p?. 

s> C 4 iriii ^^y m m m $F, 

6) VerNiider draadbruc - B. 

7) Verbindt ount B *et pen 
27a van de connector, dit 
is $2 • 

Na bovenstaande aanoassmgen 
nerkten de drie kaarten bij 
iij coed. Ik ben benieuwd of 
deze aanpassingen ook bij an- 
deren tot het g enenste resol- 
taat voeren. 

Het dank aan de heren Guus 
Asfiin tn Hilliftt Berks voor 

(fM^i Ite ^iMr kiifi mt- 
zien van snelle dyn.Rass is 
Mellicht een andere oolos- 
sing. ) 



SRflFISCH PiSWJy VDOR JUNIOR 

Boor: Hans Christen 
Postbus 50662 
3007 JD Rotterdam 
Tel.: 010 - 851481 

Od een onlangs gehouden regio- 
nale bijeenkodst te Den Kaag 
vertelde ik Mat over het ara* 
fisch disqlav dat aan i«ijn 
JUNIOR hanot. Op verzoek ver- 
strek ik liat nadere infor«a- 
tie over de Merking in de 
oraktijk. 

ftllereerst de aansluiting. De- 
ze is Hinder leuk voor aensen 
die houden van connector aan 
connector. De orint heeft na- 
•eii.ik een A^icos-bus-aanslui- 
tinq.' Bij lij is dat geworden 
print -fiatcable-connector-bu5- 
kaart, o<8dat ik de fifticos-con- 
nector te duur vond. "ortaats 
Eurocard. 

Sraficos (zo heet 'ie) beslaat 
4 geheugenolaatsen van het 
cotbutersysteeefii en heeft zelf 
16K dynaaische Ra* + een eicen 
kristal. Deze 16K is goed voor 
512 punten x 256 lijnen. De 
aeheuaenolaatsen zijn als 
volot 'oedeflniwrdt 
Datareaister XXOO 
Scroll" " XXOi 
ftdres " (1) XX02 
Pdres " (2) XX03 
Puntenoatroon XXXXXXXX 
Bovenste beeldlijn XXXXXXXX 
Lijnnutwier XXXXXXXX 
KoloonunMoer XXXXXX 
(laatste twee tellen met i»ee) 

Uaar goed op gelet moet worden 
is, dat het kolo/nnu^ftffler door 
de 6 linkse bits t^epaald Mordt 
en dat het scherft niet Dunt 
voor Dunt beschreven Mordt, 
iaar in groeojes van fl oanten 
(64 oD een lijn). 

De algertiene vor* van een 
schri if routine wordt! 
flO XX^ XX = DQN^T ChRE 
fl2 XX X = KQLOMTELLER 

fl9 XX Y = LIJNTELLER 
BD 00 XX fl « PUNTENPflTROON 
8C 02 XX 
8E03KX 

Na de laatste ooeratie oaat het 
Duntenoatroon uit de accu naar 
het scherffi 00 de olaats, door 
de inhoud van X en Y beoaald. 

Bij «ij iet IMHz (6502) staat 
de 16K binr»n 1 sec. 00 Het 



schere. 

Er is een outoutcharacter m-^ 
tine beschikbaar ^ characterset 
(funkties: BS, HT, LF, FF, CR). 
Soecifieke grafische routines 
zullen zelf 'geschreven «oeten 
Morden. 

VRAA6 EN A A MB OB 



SYN SBC 4K RAN op hit boiftf 
UK add on ( BK RAN/Eproi 
kaart Elektuur), volledige 
I/O bezetting, BK Baiic^lK 
Supereon 1. 1, in behuizirq 
Saasoe 14KTN.2 vidtotirai- 
nal 40x24, 110 - 9600 baud, 
pseudo-grafics, 2 x RS 232 
poort voor coiiunicatif att 
SYN-1 en printer. VoUadip. 
cursorbesturing. In baiwi**. 
zing Season Satalita ♦ 
deoschera (20 ca diaganaill 
+ cass. rec. ♦ voeding ♦ ai- 
trixprinter/teletype dian 
9030 132 karak/lijn, 110/ 
ISO/300 baud aet voll.ASCII 
toatsenbord full duplex of 
siaplex. RS 232 intarfaca, 
tractorfeed, aet aan 4iti 
n4 doorslagpapier. 
Vraagprijs: Fl. 2.250 «. 
Diskdrive voor Apple II t 
Fl. 700 «. 

VieuMdaU adapter voor (lUr 
rekte aansluiting van TV/ 
R6B Non/Video Mon/caft. rec/ 
toetsenbord, heeft autotalf. 
nr.kiezer voor 3 nuaaert, 
kan 1 pagina opslaan, aet 
kleine aanpassing gaschikt 
als aodea voor coaa. aet aan 
coaputer via RS 232 8 

Gijs Keiraans 
Bernadottelaan 13 
2037 6K Haarlea. 
Tel. : 023 - 342020 

m^mmm^mm mm 



Bij de Carrol Iton fabriek in 
Texas rclce onlangs de ail- 
joeiste Apple van dt band, 
een teal js dat diia pifional 
coaputer zeer hoog geno* 
ieerd staat bij de grote en 
kleine bedrijven. het onder- 
wijs en in de hoDbysfeer. 
Dat de Apple nog iano niet 
haar aarkiaantel iNiaft ver- 
loren, im mtim ^qeaaakt 
uit het^it ctet mt .#lke 8 
seconden een nieune personal 
coaputer aet die naaa gereed 
koit. 



QIRSUS PtmBL 



Prof. dr. A.v.der Sluis en 
C.A.C. Gorts. 

Deze cursus beooat een vol- 
ledige behandeling te ge- 
ven van de orograaaeertaal 
PASCAL, die ook geschikt 
is voor hen die noa geen 
prograaaeerervaring 'hebben. 
1981, 306 pag, Fl. 39,50 



BK SOURCE-LISTING JUNIOR 
WICRO-ADE flSSEKBLER/DISAS- 
SEWLER/TEXTEDITOR. 



De /net veel enthousiasae 
gebruikte Wicro-ADE wordt 
naast de 00 band verkriig- 
bare codina vergezeld van 
docuaentatie, welke tot nu 
v.w.b. de source-listing 
bestond uit KI«-oericht 
«ateriaal. De JUNIOR ge- 
bruikers kunnen sinds kbrt 
beschikken over een geheel 
00 JUNIOR aeschreven' sour- 
ce-listing,' voorzien van 



ten e.d. bedraagt F1.65,== 

Bestellen doer overschrii- 
ving van het qenoeade be- 
drao OD giro 541433 t.n.v. 
W.L,' van Pelt te Kriaoen 
aan e'en IJssel, of door 
overschriiving 00 de ftMRQ- 
bank aldaar, airo 3050 tgv 
bankrekening 44.11.06.4/1 
van y.L. van Pelt. 
Verfteld erbijs "8K Source 
Listing «icro-Ade JUNIOR". 



PERSONEL COI«^UTER KAGftZINE 



De VNU Business Grouo B.V. 
NZ Voorburawal 225 
1012 RL fltfisterdaa is half 
September j. 1. gestart aet 
de uitgave van Personal 
Coaputer Kaoazine. De re- 
daktie van het blad Mil er 
naar streven ook aandacht 
te besteden aan het club- 
oebeuren in Nederland. Het 
Blad is verkrijabaar in de 
losse verkoofi of via atMm- 
neaent. 
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hlG. L-EDENV£RGflDERING/CLJB-BIJE£NKO!^ST 
Zaterdac 19 novemtjer i9S3 



Lckat le 

Reisrou 
0^ r au v 



8 Cultupeel Centrum "De Dri stand* 
NeotunasDlein 34, fiitiersfoort . 



te: 



oer trein! 



Vanaf sneiwec Al rimstBrdajYj-j^Deldoorn-i-.enaei g. hi i KrviisDant 
hcevelaker; ricnting Utrecht, afsiag ftmersf oort:, stoc-licnt 
rechtsaf. rweede stool icht iinksaf, na 100 mr recHts ^ 

Necjt anu.soieino 

Variccf ArnnefYi-Ut recht-Den Boscr*. Bi ; Ut recnt Dorcevi ric:izir:C 
fiiYiersf oort volcen, lanps Zeist en SoesterDerq naar rotonce 
ten zairien var. flinersfoort ric-*iting ^Hoeidoorn. Snelwec vol- 
pen tot afsiaa ^roeveiaken, onceraan llnKS oncer viaduct 
ric-vbinc A'foort;, stoolicht verder ais boveifu 

Vanaf Amersf oort-stat ion vertrekken oiti de :5 man* af*visse-- 
lend bus 5 en 6. Halte NeotunusalBin. 

incl. Koffie, lunch, frisdrankie. 



09.30 Dntvanast met k of fie 

10.00 D:?er':\ng fllq* Lecenvergad#tiMf fiiaemene f^edeael inaen en IngaKC*- 

Niotulen voriae Ledenvergadenne. 
F i nanc i ee 1 Jaa rvers lac 1 9Sl . 
BBor MC 19S3. 
11.00 Ko ieoause. 

11,3 0 Ve k 1 e z : nc Kasc ont ro i e-Comivi i s s i e- 
vsrkiezinc Best uul*sl#cen. 

R^'tredend 5 Ricne van Ste€?n, >^i^t h^rKxesDaar. 

Kancidatens Schrifteli^iK aanmslcen tot ce cac van ce vercaGBrirc 
dan wei oo de vercadenng zelf- 
12, 00 i#niivraai en Sluit iihif ^Ig. ueaenvercaoenng. 
12.15 Luncfi- 

13.00 CDHHO0ORE 64 / VIC 20 ^.IWfiG 

Ter BoraKe komen interessante ontwik^^eiinaen en oemonsv rallies* 
NeeiYit Uw Ctflfi»iOdore 64 of VIC 20 mee 
13,45 Theeiiaufe. waarna ?^arkt c.o. 
14. ::5 Hsrvai^ttnc Commocore 64 / 
14.45 InforiYieei aedeelte. 
17.00 



I I t 
Forum. 
Vic 20 Middaa, 



BRENB fiPPftRATUUR MEE 



BASIC EM HUISCOHPUTERS 

lit iaar zai de belaiwstel i voor de persoriai- o-f huis- 
cottPuter ze«r sterK toenenien. Deze betin95teiiiri9 Mordt 
sterk bevofderd door de uitzendin^en van Teieac* de veie 
art i Helen in kranteri en tiJdschriften en door de verkoop 
van deze ccuouters door speciaatzaken en srootwinkelfae- 
driJven. 

Bit boek Hiaakt de potentiele hoper of gebruiker vertrouwd 
fiet de begrippen en de eigenschapperi van iicrocoiPuters. 
OMdat B!)SIC de pnjgraMfseertaaf is voor de huiscottuter be- 
vat dit boek tevens een zeer uitvoerise cursiis BftSIC. 
Boor de uitge^erkte prosraiw^oGrbeeiden kan de iezer 
ziin kennis te^ten en zai hii aestiMUieerd woriieA on m\i 
te 9aan Prosrattnereri. 

ISBN 38 201 1305 4; iS Piirna'i; ptub Tu 2b- 



7EKSTVEJBERKIWG. 

J. K. Baivert en D.J. Fibers. 

Een tekstverinierKer is neer dan aileen Haar een vervansins 
van een schriJfoiachine. Veei vrasen op dit sebied deden 
de schriJverSf aiiebei a! seruifiie tUd werkzaan ais advi- 
seur in de autottat iserinsi ertoe besiuiten dit boek te 
saan schrijven. Ket is een aisemeen orientererid uerk dat 
OP veie vrasen in deze naterie een antwoord kan seven. 
Het boek seeft een over z icht van de verschi ! leride soorten 
tek'stverMerkins die ioseiiJk ziJn en de daarbij sebruikte 
iiachines. Verder wordt aandacht besteed aan de verschei- 
dene docuttenteni de onderdeien van een wordProcessor 
(onder ardere het beeidscherm) en het aanpassen vari een 
bestaande situatie aan een tekstverwerkend apparaat^ 
waarbij het MenseiUk aspekt op de voorsrond suat. 
ISBN 9B 1ft tmi % 12B Pi9lni's» priis Fl. 31,31. 
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^QPFY-DISC Q? fiIK-S5 D. ft. GeRRITSEN MEDEMBLIK PAGE 



:t: :f r4^: jf.: :tr ^f : 

•f::t::H::i-'H: X-: >h: :t: :t: 

>\< >}■: >!•: :4-: i : >f: >|.: 



SCK££;PhAKERSSI!siG£^ 4 
lS7i JC mEDEfiBuIK 
T#J „ s 02274 28ie 

*■ V G' ' ! -51 "l C 5T I 'Ei' <_( E* W T k V 

v'oor Dil 5502 KIilMMZR s 
rfidUB JoriK man. 



Toen Ik besloten hed drt een disk-systeem voor random opslag van data aan mijn 

Airl-tl; noodzf-heli.ik Wf s gev/orden, stond ik voor net probleem hoe dit a^^.n te vat- 
ten. iCen speurtocht langs diverse levero-nciers leverde v/el een scala van drives 
op, maar over de interface van een drive aan de kJK ontstond nogal wat onduideiljk^ 
heid* En v/r-.t betreft Goftw^^re was het al helemaai duisber. ilr vverd wel melding ^e- 
raaakt v n diverse DOS'sen, die van aiies konden, maar w.jt dat *alies' dan was, en 
voorai hoe het moest worden afnge&raeiit mp de AIM waa nlet duideli;fk, (^iii^t ik wel 
een idee had van hoe het eruit moest zien (uit ervarini^ met 'grote* systeraen) en 
om verder alie probiemen met het aanpassen aan de AIM te voorkomon heb ik toen be- 
sloten allea zelf maar te doen. 

DE HARDV/AI^E . 

Op het allerlefrgste nivo moest er een stuk hardware kDmen, de z,*^-;. interface. 
Hiervoor viel mijn keus op een setje IC^s van Westera Digital, voornamelijk omdat 
hiermee het probleem van de refd-clock eenvoud was of te lossen* Ook aprak het Op- 
drrchten-repetoire v«n de controller mij wel aan. 

Het b#?sls schema, wa^^^rvan ik ^en ultgegaan, komt ook van Western Miitiil, m Iffi 
mij ter beschikking gesteld door de leverancier ven de IC's, een firma in Utrect. 
Kirenll.ik benoefde er rrn dit schem^^ ma-r weinig toegevoega te woraen. 

De belrngri jkste IC's zljn: 

-r De FDC (WD1797): 

Nr(?r de computer toe bevf t dit IC een 8-bit data-bus, R/w en 2 adreslijnen plus 
een OS lijn. Ook zijn er 2 intterrupt-uitgangem^ maar die zijn verder in dit 
interactieve systeem niet van belang. 

Qe twee adrei^ lijnen wijzen op 4 geheugen-plaat^en. Iregistera)* 

iegi6t0r j^'l: R/^^/ = rerd, het register is status register en diverse bits heoben 
betrekking op de status van de controller. Zo zijn er bits voor o.a 
ireaif'f 'busy*, » data-ready » en diverse foutcondities* 
R/VV = v/rite, het register is nu command register en door nu een 
byte met een bepaald bit-patroon te schrijven, kan aan de FDC een 
opiiteaeM; worden gegeven. 

Register 2 en 3: hierin worden^ reEpe^tieii«ii4k^da.jjeweast tr<>ck en sector op- 
gegeven. 

Register / 4: dit is het #af a^register . Hierin Mj het schrijven de data 

worden arngeboden, en bij het lezen verschijnt hierin de data# 
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Verder le er een clock aensluiting, die bij gebruik van 5i inch floppy's op liviliz 
raoet komen. Dit km gewoon de ja2 van de computer zija* 

Door een hoog of een leag TTL signac-1 aen de DDEN ingang te leggen, kan gekozen 
t* : warden voor single of double density, umdat het voor de drive zeif eigenlijk niet 

uittnrrkt, welke density gekozen wordt, iigt het gebruik van double de^it^ voor 
. de hpnd, omdat er di^n 2X zoveel data op een diskette kan worden opgesiagen. 

De overige a?»nsluitingen hebben te maken met het z.g. read-clock signaal. Bij het 

lezen vrn de diskette kan n.l. de 1 Mhz clock alet meer als referentie dienen* 

i.v.m. snelheidsvrrif^ties van de drive. 

- De ref'd-clock controller (WD1691;: 

De taak van dlt IC is cm uit het binnengekomen read-signaal een read-clocK te 
maken. In wezen regelt deze het stuursigneal voor een voltage-contMi#t^o#^lMt.or 
(hier een 7/.sl2A). Het werkt zeer eenvoudig* Voor eike halve tijdseenheid (= 2 usee) 
Wi^mn 3 in eerie geschakelde one-shote (elk 2/3 usee) getriggerd. Komt er van de 
drive een pulse binnen in de eerste l/3de period©, 4m a^opt de f ^ blijkba&r te 
snel en wordt dus wat langzamer gedrukt, komt er #en puis binnen in de tweede peri- 
ode, of komt er helemaai geen pulse binh^n in deze cyclus, dan veranderd er niets en 
als er een puis binnenkomt in de laatste periode, daa wordt de ¥<X) w«t aneiler ge- 
zet. Het geheel levert een stabiele constructie op* 

• De schrijf compensatie (WD21A3): 

Dit IC verzorgt ©en kleine aanpassing op het schrijf signaal. Dit is echter voor 
5* inch diskettes van weinig belang. 

Wmt mt mm mij nog wmm Itm^ mmmm im toe«€^egd is behalve de buffering (naar de 
computer en na^r de drive) het volgende: 

-Een chip-select schpkeling vanaf de adres bus t.b.v. memory mapping van de FDC* 
-Een op 8 seconde staende one-shot, welke getrlggerd wcm4t vanuit de CB lijn van 
de FDC, Deze bedient de motor aan-uit omdat hierin door de FDC niet is voorzien. 
Ms Vi^n meerdere drives gebruik gemarkt zal worden, moet hiervoor een extra data- 
latch worden gebruikt , welke den met teen de drive select ie op zicht neemt* 

Tot zover de hardware • 

DE SOFTWARE (DOS) . 

Persoonlijk ben ik niet zo gelukkig met de benaming DOS. Enerzijds suggereert dit 
dat het OS er is t.b/v. de disk, terwijl die disk toch moet worden gezien als een 
min of meer toevallig aanwezig in- en uitvoer medium. Anderzijds zie ik een OS meer 
als een besturingssysteem voor meerdere gebruikers ( mult ipro gr ammer ing) . De meeste 
6502-systemen zijn echter specif iek op §§n gebruiker gericht, en dan spreek ik liever 
van een (interactieve) monitor. Overigens is een systeem voor meerdere gebruikers 
ftiet te vergelijken met een systeem voor 6§n gebruiker. De door mij ontwikkelde soft- 
ware kan alleen maar gezien worden als earn mittoeiMa^ op de bestaande monitor van. de 
AIM-65. Het bestaan in wezen uit twee delen. Het eerste deal (3 Kb) is voornamelijk 
het gedeelte dat het werken met disk mogelijk maakt. Dit gedeelte heb ik Decimal-Disk 
genoemd. Het tweede deel (5 iCb) bevat allerlei to«teM en belleft oa op qomfidJ^tabel© 
wijze van de mogelljkheden van disk, in combinatie met casaette^ gebruik te konnen 
maken. Dit gedeelte heb ik EXAIM genoemd « 

DE UITGANGSPUNTEN . 

De diskette ie in eerste plaats bedoeld voor opslag van data, welke aangemaakt en/of 
gebruikt wordt in zelfgoschreven programmateur. Het opslaan (en snel kunnen laden van) 
progrrmra^ps is in deze fylosofy ingepast. Er is daarom gekozen voor het tbestand mt 
records » concept, te vergelijken met kaartenbakken met kaarten. Dit maakt het mogeUj* 
Oil «e Itruktuur van de rocords naar eigen inzicht te kiezen, van zeer eenvoudig (b^t. 
1 byte) tot zeer uitgebreid en complex (een reeks van variabelen, array string©, 
et c • ) « 
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ilet s:;steem moest aen de volgende eisexi voldoen: 

- Het iezen of schrijven van een record in ©e programma moest eenvoudig zijn te re- 
ft User en. 

- ilet aantal bestanden, wat op een gegeven moiiient doOr een programiaa in gebrulk is, 
raag niet aan beperkingen onderhevig zijn» 

• Records in een bestand moeten random toegankeiijk zijn, 

- Records in een bestr?nd moeten muteerbaar zijn, d.w.z, het taofet mogelijk zijn een 
bep;;.7ld record van een bepa;..ld bestand te kunnen wijziiien. 

•:m de koppelin^: te rer-iiseren Vrn bovenstaande eiseri on de fytiieke eigenschc^ppen v^'^in 
de disk rordt /^ebruik i;::em-:-- kt van de techniek van biocid.nfi en het iiiebruik van bufferii^ 
Onder een block v-ordt versta#n een groev> van een of meer rec<3^i^# leH buffer is een 
f=9neen.r:esloten geheu^engebied ter grootte van 66n of meer disk-sectoren, v/acirin een 
block prst. Naast de ruimte, v/elke in het prograin:aa dus moet v/orden gereserveerd vuur 
een record, moet er dus ook ruimt# de buffer worden geressr^eerd. i* m 

block V'-^n records '-'elke bij fysiekc disk in- en uitvocr T:ussen buffer en disk getrans- 
porteerd vordt. Bij een lees of een schri.jf opdracht in een prograimaa worat net betref- 
fende reord retr^nsporteerd tussen zijn plf . ts in de buffer en het record-geneugenge- 
bled. rvisieke disk i/c vindt dfn .-u torn'- 1 isch plac ts els er aan een record gerefereerd 
wordt, vwt op dit noment nlet in de ouiier ata/.t, Het is de oedoeling een zodanige 
blocklnf-s-f'^^ctor te kiezen, drt een zo*n optimaal mogeiijk gebruik van de aisk-^ruimte 
v;ordt berelkt. Ter toelichting een voorbeeld. 3tel dat net een bestana betreft, waar- 
v:. n de recordi? 20 bytes lang zijn. iuen disK-sector is 'jI'Z bytes. Als nu ais biocKings- 
f actor 2b v/ordt genomen, zal dit per block 20 X 25 = buO bytes opleveren. Dit past in 
een buffer ter grootte van 66n disk-sector, met een veriies van 12 bytes (per sectorj* 
Als als blockings-factor bl wa^. gekozen, zou dit per block 2u X = lu20 bytes neboen 
tpfeleverd, Mt past in een buffer ter grootte van 2 disk-sectoren met een veriies van 
A bytes (per 2 sectoren). Dit laatste voorbecld gceft dus een betere bezetting van ae 
disk-ruimte, t-cn koste van een groter geheu^-enbeslag in prograiiuaaas, aie van dit be- 
stand f^ebruik raaken. Ook zal in dit l^^atste voorbeeld sequentiele verwerking veel snel- 
ler gaan* 

Een beperking, df^t pan het toegepaste systeem is opgelegd, is dat van 66n bestand 
glle ree<3^rds even lang moeten zijn* 

Het ceprien v n een gunstir^e bio cid.ngs«f actor zou eventueel in de toegepaste prograffl- 
meertfjrl kuniien pl^ ■ tsvinden. 

Er moet com:nunicr t ie pl^^r tsvlnden tussen het progr;*i«mma dat Vcm disk-bestanden gebruik 
m-'-kt en de be^^t uringssortwrre. Ook ligt het voor ae hand, om v/at gegevens betreffende 
■mmn bestrnd, d-^t in mm ^r^^i^mma getamikt mmr4t^ in bet geheugen vast te Jioiiit;n* I'en 
behoove vpn bovenst- rnde vordt voor elk bestajad, dat mogelijker wijze in een programma 
gebruikt .orat, een ^,eheu engebiedje van oO bytes gereserveerd, Ik keb dit CIA 
iffliti*4Wei^l^e*#i^^^^ genoemd* Jlndert teeii«^B^iit;en zijn: file-information*^#l##k (FIB) 
of uSer-file-Qescriptor CliFD). De programmeur moet hierin reeds eni,2,e giegevens zetten, 
zoals de naam van het bestand, De meeste gegevens v/orden hierin echter vanuit de disk- 
iSd^H g#aset door hot bMtiiiMnpNB^te^ op het moment dat hot bestani i^f €t Ipi^i^iil (voor 
bestaande best^.nden). Wat hierin ook ingezet moet worden is bet start adires ifan hot 
record-geheugen gebied en het adres win de buffer. 

Opdrachten aan het besturingssysteem vanuit een programma worden gedaan d^m^v. 

jump-subroutine naar een bepaalde plaata in liet besturingssysteem* Blk soort opdracht 
neeft zijn eigen start-adres. 
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Er zijn de vol^ende opdrachtea: 

Open input ; open een reeds best a ^nd bet>tand om dit te lezen» 

'* I/O : open een reeds bestrjrnd be^itand oni te iezen en te schrijven (muteren) ♦ 
" output : open een nog niet best/^^^nd bestand oia hierin te lachxij v on. 

0/1 : open een nog niet bestaand bostand om hierin to scnrljven en teru^i Zb 
lezen. 

Herd : lees een record vfn een bestfmd. 

lrt%# : sc rtjf een record n^^rr een bep^- Id best and* 

Cloce-'purce : sluit een bestrnd «»f en verv/ijder het. 

Cloce : Elult een bestfnd - f , en f Is net eon nieuv/ beotanci betreft, neeai net op 

in de disk-index. 

Doordrt een bestead prs op iiet moment v- n -:fsiuiten in de incicx v/ordt op-:^enomen, Kunnen 
meerdere bestmden Tiot dezelfde n^im , elijktijdi.r; open (in r:ebruik.) zijn. Overloeno 
moet elk bestrnd op een diskette een unieke na;. m hebben, omdat er anderii geen onder-* 
scheid meer kf-n worden ^rom^rkt tuscen bestanden met dezelfde naara. Bij elke opdracht 
moet nu nog v/orden f?angegeven om v/eik bestfnd het gaat. ilr kunnen liiimers meeraere ue- 
standen tegelijk in een prorramm^^ In ^ebruik zijn. Dit wordt gedaiifea door aciiter 4e 3 
bytes v^n de jump-subroutine instructie, die ae soort opdracht weergeeft, 2 bytes op 
te nemen, waarin het sdres van de control-inter fa ce-acea van het betrefiende beiitand 
staan. Het besturingssysteem begint elke opdracht met het ophalen van dit adres. 
(N.b. daar deze bytes over^reslar:en moeten woraen bij terugkeer, keert het besturings-^ 
systeem niet op de normale v/ijze, d.i. met een HTo, toru^.;. 



UITZONDi:jRi:jaEN . 

Het besturingssysteem kan niet alti.jd de opdracht zonder meer uitvoern* Als een op- 
dracht niet normr - 1 fgehandeld kan worden zal er een f uut-boodscha^j v^oruen ^e^evea 
mm wordt terug^ekoerd naar de comand-mode Vc-n de monitor. Er zijn twee soort en uit- 
zonderingen, n.l. 

• Fettle fout: Hieronder valt b.v. een harde disk-error, het :;even van een i:»cnrijr- 

opdrrcht i.n een best and, dat voor input is geopend etc* 

Bij het constpteren vrn een f^tf^le fout waird* een systeem«reset ^egeven en is net 
uitvoerende progr^^mme metteen fifgeiopen. 

* Wm uitzonderinf, welke doorige^Bt^jrt feaa i»mmM M^dner vallen zulke zaken als 
het openen v^n een verondersteid ranwezig bestand, v/at er niet echt 11; (b.v. omdat 
het een pndere nrrm heelt), het ;?fsluiten vrn een nieuw bestand, terwiji er al een 
bestr^nd met die mm m§ <iiakett# B%#ijt tt^* 

Ar^n het com^^ndo repetoire vrn de monitor zijn enkele (2-letter) coraando's toegevoogd, 
v rrrmee dit soort zrken k-n v.oraen r f gehandeld en waarop het prograrnma daarna weer 
verder gip^t. 



DK M0NIT02 EXCENSIE (EXAIM) . 

B»t tot zover beschreven systeem (Decimal-Disk) verzorgt feitelijk de elementaire 
aktiviteiteni velke nodig zijn om met bestanden op diskette te kunnen werken. Er 
is il#ar §%^M^m1^^ wm zo'min- aogelijk van de bestaande monitor gebruik te maken. 
Alle%n voor wat betl*eft de uitzonderingen is er enige koppeiing met de monitor. Dit 
houdt echter ook in det er maar weinig voorzieningen zijn voor de gobruiker mm in- 
vloed uit te oeffenen. Ook beatond de behoeft om de cassette-recorders in het geheel 
te betrekken. omdat bij gebruik van 66n drive het niet mogeiijk is bestanden v^n 
66n diskette op een andere diskette over to nemen. Daarom fetffe ik ^mm impart atuk soft- 
ware ontwikkeld om hierin te voorzien. Globaal kan men dit stuk 0dftiiare weer in twee 
gedeelten onderscheiden. 

Ten eerste het integreren van cassette an diskette^ Booi^ia% de opii^aelifeem nu via deze 
extensie verlopen, k?n gekeken worden of een bepa.:,ld bestand op aiskette of op cas-- 
sette Bt&Bt. Er hoe ft nu bij het schrijven Vcvn een programma geen rekening mee te 
rorden gehouden of een bestand op het moment van gebruik op cassette of op disktette 
etpet. Natuurlijk kunnen niet file ^ ktivlteiten, welke op diskette gedaan Kunnen word- 
en^ ook op cassette worden ged^^^rn, zoals random toegankeii jkheid en het mutcren. 
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Het tweede deel ven de ©attensie bestaat uit een reeke vaa coiaaado»8, wwcmee allearlei 
pktiviteit€fii kunnen w<>^en ge&tert. 
Dit zijns 

i^ecutei*en van een progremma. 

Het programme bevindt zich (als een data-bestand) pp diskette. Ret dit comando 
wordt nu het progremm^ vanaf diskette in het geheugen geladen en wordt met Iiet uit- 
Toeren een aanvang gemaakti; 
. Het saven (dumpen) ven 66n of meet^ bestanden van een diskette op een cassette tape. 
Dit b.v. als backup of voor het overnemen van deze bestanden op een andere diskette 
als er maiar fe6n drive in het systeem hangt, 

- Het terugladen van bestanden van zo'n dump cassette tape. 

. Het displayen van de index van een diskette of van een da»iti#e* 
•rhet vei^aiuii^en van de naam van een bestand op diskette. 

- Het verv/ijderen van 6fen of meer bestanden van een diskette. 

• Het copieren of display en/print en van de inhoud van een bestand of. een selectief 

gedeelt^ van een bestand. 
Dear bij een uitzondering situatie (aie boven) het systeem terugkomt in de monxtor- 
comand-mode, kunnen deze opdrachtem worden gebruikt oa de situatie zodalig te maken, 
dat het betreffende p3PO^amma wear doorgestart wordt. 

INSTALILATIE . 

De software vordt opgeslagen in een stuk van 8 Kb in EPROM (b.v. 2 X 2732), waar- 
vpn het be^H op een a Kb grens moet liggen. Bij mij is dat adres BOOO, maar de 
software kPn vert;?rld worden voor elk gewenst begin adres. De ^^^^^llJ^^^^^ J^"" 
de 2de EPROM zijn niet gebruikt, Mt geeft de mogelijkheid am dea^e msm's ook op 
de interfpce kP-rt te pL-^rtsen en een zodcnige chip select toe te passen dat deze 
geheugenpl^^^tsen gebruikt worden voor de FDC (en bij gebruik van meerdere drives, 
se le ctie-*^ia cii ) . 



de 



Verder heb ik de beschikking over de volgende programma's: 

-?FQRM: Dit om finieuwe) diskettes op de juiste wijze te formatten. 

-aSD-D: Bit farogramma zet een edit or- file onder een opgegeven naam op diskette. 

-3eD-L: Hiermee laad je een editor file van diskette terug. 

•.?)OBJ : Hoewel mijn assembler wel bovengenoemde editor files van diskette als input 

source kmm lezen, wordt de aangemaakte object altijd in het geheugen gezet. 

Met dit progremma kan ik nu dit geheugen, onder vermelding van een start-adres 

:als pro gramma op diskette zet ten. 
- SGIN: Met dit programme kan ik, onder opgave van een aantal parameter, een programma 

genereren, dat een bestand kan sorteren. 

Zelf WWii i* altijd in een (zelfgemaakte) assembler op mijn AIM-65. Het Ujkt me wel 
intero«38ant om te bekijken in hoeverre het systeem ook op andere a502-systemen kan 
worden toegepast, en toegepast zou kunnen worden met andere prograameertale% %o&2m 
b.v. een of andere BASIC interpreter. 

Een uitgebreide beschrijving is beschikbaar. Geinteresseerde leden kunnen ten alle 
tijden kontact met mij opnemen op het onderstaande adres. 

D. A. Gerritsen 
Scheepmekerssingel 4 
1871 JC MEDBMBLIK 
tel; 02274-2806. 
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aiil CO 












CI 




^ CS- Fl>C 



RE-FOC 



fl&.l CONTROL-LINES O? INTERFACE 




uoor 



2 ^ f drills 




NZs ONE iHOT 

Nl« OPEN COLLECTOR DRIVER (POWR) 



Ft6.2 ORVVe SELC^CT MOTOR-CONTROL 
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BDEKEHIJST VDDR E5B2 GEBRUIKERS, 

li m boekeniiJst voor E5I2 9ebruiKers Mordt inforia- 
tit Wrstrtfkt 0^ in dt iiandfrl vtricf iisbwrt kmm 
m ttidschriftm. 

PRDGRWMING THE PET/CBH. 

Tot nu toe is dit het beste boek voor sefaruikers van 
PET/CBH Hicrocoiiputers. ondat u hierin een schat aan 
infomatie aantreft on bet prosraflweren orider de 
imie te KTijaen. Het boek bevat ruin 58B dichtbedruk- 
te pasina's en is verdeeid iri 17 hoofdstukkeri. waarin 
PET/CBH' s Basic diepsaard Mordt besprokeri. Het is 
zelfs MogeiiJkt niet standaard aariMezise opdrachten 
toe te voesen: veei voorbeeiden hoe dit kari worden 
iereAliseerdf zijn oPsenoMen. De werking en het se- 
brtfik van de bekende schiifseheugens (CoMPuthink en 
COMiodore) Mordt besproken. De Basic 4 schiJfbesturinss- 
coiMaido's Norden uitvoeris oMschreveri. Heei beiari^riik 
is het 9edeelte over wchirietaai* dat voi iedis op de 
PET/CBH is toesespitst. Hieraan kunnen ook VIC--9ebrui- 
kers veei hebben ais ze ziJn uitsespeeid. Eike opcode 
uordt uit9eie9d aan de hand van prosrajmeer voorbeeiden. 
Over KM routines is al veei sepub! iceerd: hier staan 
de belansriJkste bij eikaar en Nordt uit9eie9d« hoe 
len ze kan 9ebruiken eri reioceerbare iaadroutiries Kan 
opzetten. Ook Mordt ruitt aandacht seschonken aan I/0« 
asseiibierSf wedses. De 9eheu9enindelin9 Haakt een di- 
rekte verge! ijkiri9 tt09eiiJk tussen Basic 1> 2 eri 4. Dit 
bespaart veei zoekwerk en otirekenen eri is een NeikoMe 
aanvuiliri9 op de PBE ROH-speciah waarin de complete 
Basic's (1 en 2) ziJn afsedrukt. Er is een apart 
hoofdstuk 9eNiJd aan alie rekenkuridi9e wgeiiikhedem 
inclusief iachinecode en het boek besiuit net voor- 
beeiden en toepassiri9en voor zakeliik en educatief 
februik en een uitgebreid trefwoordenregister. 
Het boek kost Fi. 88>25 ind. BTU en verzendkosten. 
Inf.: CopytronicSf Bur9. van Suchteienstr. iBt 
7413 XP Deventer. Tel. : 85788 - 31835. 



MBIC PR06R»ltt«S VDDR SQOOL 

EM BEDRIJF 

M.Th.a,il. ViJni95Child 

Dit boek bevat een derti9tal 
Ba5ic-Pro9raHtta's> onderver- 
deeid in vier sroepeni te «e- 
ten al9eniene, wiskundi9e en 
5tati5ti5che» financiele en 
zaKeiijKe pro9ra«tta's. De 
eer5te sroep bevat hoofdzake- 
iiik sorteeruethoden en tNee 
praktische toepassingen daar- 
van. De tweede groep 9aat in 
OP fuRktiesi 9eiiddetdem He- 
diarien en standaarddeviaties. 
De voigende groep gaat in op 
tabei I eri voor constante en 
eincft«aarden« annuiteitenbere- 
keningert, woonlasten en per- 
sooniiJke leriingen* terwiii ^ 
laatste groep Prograiuia's be- 
vat voor f inane ierin9en» uaKi- 
iiaiisatie, rentabiliteit, PERT, 
kritieke Pad-nethode en opti- 
fiiaie l)estei5erie. In een appen- 
dix worden enige tiPs gegeven 
voor de diverse Basic-diaiectent 
zodat al deze prograMia's, tie- 
de door hun universele opzet, 
OP zee r veei coHPutersysteiien 
iioeiteioos zuilen kunnen draai- 
en. Eeeri literatuuroverzicht 
cottPiewenteert het geheel. 
ISBN 98 281 1513 7 Priis:Fl.24,58 
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Using FORTH 
with tiie 6502 

INHOUD VfiN HET VDCftBULRRY. 



DIT VOCABULfiRY IS APlNGEPftST AON DE STANDAARD 79 VAN R. L. SMITH 
ECHTER ZONDER DE WDORDEN: S0 

DEPTH 

WORD 

POCKET 

WEL TOEDEVQEDD ZIJNs CLS C BCHOONMAKEN BEELDSCHERH ) 

GRAFISCH ( GA OVER OP GRAFISCHE MODE ) 
NORMAAL < GA OVER OP NORMALE MODE ) 

PRAAN C ZET PRINTER AAN ) 

PRUIT ( ZET PRINTER UIT ) 

EDITOR ( VAN W. F. RAGSDALE > 

DOOR : Gerard van Roekel 

Van der Palrastraat 11 C 
3135 LK VLMRDINGEN. 



PRUIT PRAAN NORMAAL GRAFISCH CLS DMIN DMAX CMOVE 

MOVE DU< D= D0= 2VARIABLE 2SWAP 2R0T 20VER 2C0NSTANT 

2! 23 s +L00P LOOP C+LOOPJ (LOOP) J I DO CDO) 

SCAN) FORGET VARIABLE CREATE VOCABULARY FIND -FIND- 
ROLL -FINDl FILL SLIP SPREAD PLUNK PICK U< D< 
2- 1- m U. SAVE-BUFFERS D- RQ 2/ 2*= DNEGATE 



U/MOD NOT CONVERT EXIT NEGATE ?DUP > IN 
2DR0P WHERE EDITOR LINE TEXT FROM-TAPE 
SGR-WRITE BORDER HON VLIST TRIAD IMDEX 



2BWAP 2DUP 
TD-TAPE SCR-READ 
LIST 7 

. R D. D. R #S # SIGN #> <# SPACES WHILE ELSE 
IF REPEAT AGAIN END UNTIL +LOOP LOOP DO THEN END IF 
BEGIN BACK FORGET ' R/W READ WRITE BREAK DISC WAIT 
— > LOAD MESSAGE .LINE CLINE) BLOCK BUFFER DRl DR0 



EMPTY-BUFFERS FLUSH UPDATE 

*/MOD MOD / /MOD ♦= M/ 
+- S->D COLD ABORT QUIT 

IMMEDIATE INTERPRET 7STACK 

CREATE ID. ERROR (ABORT) 
WORD 

•I 



+BUF PREV USE M/MOD 
M* MAX HIN DABS ABS D+- 
<; DEFINITIONS FORTH VOCABULARY 
DLITERAL LITERAL tCOMPILE^ 
-FIND NUMBER (NUMBER) UPPER 
PAD HOLD BLANKS ERASE FILL QUERY EXPECT 

(.") -TRAILING TYPE COUNT DOES) (BUILDS ; CODE 
(5C0DE) DECIMAL HEX SMUDGE <■ COMPILE 7L0ADING ?CSP 

7PAIRS ?EXEC 7C0MP 7ERR0R ! CSP PFA NFA LFA 



LATEST TRAVERSE -DUP SPACE 
, ALLOT HERE 2+ 14^ HLD 



STATE CURRENT CONTEXT OFFSET 
DP FENCE WARNING WIDTH TIB 

FIRST C/L BL 3 2 1 

! C! ! Ca a TOGGLE 

MINUS D-»- -I- 0( 0= R 

SPS XOR OR AND U/ U* 

ENCLOSE (FIND) DIGIT I 

BRANCH EXECUTE CLIT LIT 



ROT ) < U< = - C, 
R# CSP FLD DPL BASE 

SCR OUT IN BLK VOC-LINK 
+ORIGIN B/SCR B/BUF LIMIT 
USER VARIABLE CONSTANT 
DUP SWAP DROP OVER DMINUS 
>R LEAVE ;S RP! SP ! 
CMOVE CR 7 TERMINAL KEY EMIT 
(DO) (+LOOP) (LOOP) BBRANCH 
OK 



0 

4- ! 
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VOLGORDE VAN HftNPiLtNG OM EEN NIEUM MPO«il ^ HET VDCftBULFlRY TOE TE VOEGE 



MET EEN FORfW f^ltOBRflMMft IB HET NIET ZD MDEILIJK OM EEN NIEUW WOORD TE 
MftKEN, DOCH OM HET OP DE BOND TE ZETTEN EN LPlTER WEER TE LADEN OF Nft EEN 
KOUDE START, ZAL BLIJKEN DAT DIT WOORD NA "VLIST" NIET MEER fSMm KQMT, 
HtER VOLGT EEN VOORBEELD VAN DE HANDELINGEN. 

a. LAAD HET FORTH PROGRAMMA IN HET GEHEUGEN. 



b. TDETS in: 



1 

2 

4 
5 
& 
7 

.8 
9 
10 
11 
12 
IS 
14 



200® SPAT IE R 
BREAK 

EMPTY-BUFFERS 

EDITOR • 
1 CLEAR 



<RETURN> 
(RETURN) 

< RETURN) 
< RETURN) 



OK 
OK 
OK 
OK 



(OP HET SCHERM VERSCHIJNT "fig FORTH 1.2") 
CZET DUPLEX. SCHAKELAAR OP HALF DUPLEX) 
(BREAK VEKTOR GEZET) 
(SCHOONMAKEN GEHEUGEN BUFFERS) 
(PROGRAMMA EDITOR GESTART) 



NU ST A AT SCREEN I GEREED OM INGETOETST TE WORDEN 
TOETS in: 



arss'ssss'sssss 



( NAAM VAN HET GEMAAKTE WOORD 
HEX 



GVR-3 10583 ) 



CLS 0C EMIT 1 



( SCHOONMAKEN BEELDSCHERM ) 



FORTH DEFINITIONS DECll^L 

LATEST 12 +ORIGIN ! HERE 28 -hORIGIN ! HERE 30 +DRIDIN ! 
' EDITOR B ■»- 32 +ORIGIN ! HERE FENCE ! SS 



ALS DE SCREEN 1 IS INGETGETBT ZftL DIT VAN HET GEHEUGEN BUFFERS NAAR 
NAAR BORDER 1 GEPLAATST MDETEN WORDEN 
( BORDER 1 « *G400 TOT ♦S7FF ) 



d, TOETS INS 

SAVE-BUFFERS 



(RETURN) OK ( ZET SCREEN 1 OP AD RES *G400-*B7FF > 



INDIEN U GEEN fig FORTH 79 STANDAARD TOT UW BESCHIKKING HEBT, KENT 
HIJ HET WOORD "SAVE-BUFFERS" NIET. MEN DIENT DAN HET WOORD "FLUSH" 
IN TE TOETSEN. 



e. TOETS INI 



1 LOAD 
VLIST 



(RETURN) OK ( LARD PROGRAMMA IN VOCABULARY ) 
(RETURN) ( 6EEFT GEHELE WOORDENSCHAT ) 
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ALS ALLES NAAR WENS IS VERLOPEN ZAL HET EERSTE WOORD "CLS" ZIJN. 



LUOD'SJaMOIjAHOp'MMAA 



E^Ei 5 |n ^ KEIMNER 



DE OPBOUW VAN DE SCREEN. 

HEGEL 0 DEZE NEEMT NIET DEEL ftftN HET PROQRfiMMA EN IS BIJ UITSTEK 

DESCHIKT DM ALS TEKSTREOEL TE GEBRUIKEN. VOOR DE HAND LIGGEND 
IS DAT HIER DE NAAM VAN HET PROGRAMMA KOMT TE STAflN. ZET DEZE 
TEKST ALTIJD TUSSEN HAAKJES. VERDER IS HET HAND I G OM DE DATUM 
TE VERftELDEN MANNEER DEZE SCREEN IS GEMAAKT. 

REGEL i WORDT VEELAL TOEGEPAST DM TE VERMELDEN OF DE CIJFERS IN HET 

PROGRAMMA IN DECIMALE OF HEXADECIMALE NOTATIE STAAN. REGEL 1 
KAN OOK GELIJK VOOR HET PROGRAMMA GEBRUIKT WORDEN ALS IN 
VOORGAANDE SCREENS REEDS IS VERMELD WELKE NOTATIE WORDT 
GEBRUIKT. 



REGEL 2-15 WORDT VOOR HET PROQRAMIHI GEBRUIKT EVENTUEEL MET BEGELEIDENDE 
TEKST TUSSEN HAAKJES. 

AAN HET EIND VAN DE SCREEN HOET MEN AANOEVEN OF HET PROGRAMMA DOORGAAT OF 
STOPT. 

— > BETEKENT DOORGAAN MET HET INLEZEN VAN DE VOLGENDE SCREEN. 
IS BETEKENT DAT HET PROGRAMMA STOPT OP DEZE SCREEN. 



REGEL 4 TOT 6 IS ALLEEN NOODZAKELIJK OM HET NIEUWE WOORD VOOR ALTIJD 
IN HET PROGRAMMA TE ZETTEN. 

DEZE 3 REGELS DOEN IN HET KORT DE VOLGENDE UITVOERlNGElsil 



m DE INSTRUKTIE 1 LOAD WORDT ER GEKEKEN WAT HET EINDADRES IB VAN HET 
LAATST INGEVOERDE WOORD ( ADRES 2FBC ADRES LAAG LAATSTE WOORD ) 

< ADRES 2FBD ADRES HOGG LAATSTE WOORD ) 
ADRES LAAG WORDT MET 1 VERHOOGD EN ZET OP DIT ADRES HET AANTAL TEKENS 
WAARUIT DIT WOORD BESTAAT ( +*80 ). 
VERVOLGENS IN ASCII HET NIEUWE WOORD. 
HIER ACHTER HET STARTADRES VAN HET VORIGE WOORD. 

DAARNA WORDT HET INQETOETSTE PROGRAMMA GELEZEN EN OMGEZET IN DE DIVERSE 
JUMP ETC. 

EN lET ALS LAATSTE OP DE ADRESSEN 2FBC EN 2FBD HET EINDADRES NEER VAN 
HET NIEUWE WOORD 

REBEL 4 TOT 6 IS OVERAL IN DE SCREEN TE PLAATBEN, DUS OOK OP REGEL 13 TOT 
15, WEL IS DE VOLOORDE VAN DEZE REGELS BELANGRIJK. 

EINDIGT MEN EEN SCREEN MET — > DAN KAN MEN DEZE REGELS OOK IN DE VOLGENDE 
SCREEN ZETTEN. 



BIJ HET AANMAKEN VAN EEN SCREEN IB HET NIET ALTIJD NOODZAKELIJK OM 1 OF 
MEERDERE WOORDEN VOOR ALTIJD AAN HET VOCABULARY TOE TE VOEGEN. FORTH ZOU 
IN KORTE TIJD VOL ZITTEN MET NIET ALTIJD BRUIKBARE WOORDEN. INDIEN MEN 
EEN PROGRAMMA SCHRIJFT ZONDER DE REGELS 4 TOT G KAN HET PROGRAMMA NORMAAL 
GESTART WORDEN. DOCH DE ADRESSEN 2FBC EN 2FBD WORDEN NIET AANGEPAST, 
ZODAT MET EEN KOUDE START DE WOORDEN NIET MEER TERU6KEREN. 17 



LUOD'SJaMOI^A^^Op'MMM 



Ei 5 D iE! 



SCREEN OP BOND ZETTEN 

IB EEN SCREEN GEMftftKT IS HET NUTTIG DEZE OP DE BOND TE ZETTEN. ZEKER 
PILS DE WOORDEN NIET VftST I« HET PHOGRAMMA KQMEN TE ZITTOst* 

TOETS IN 

e 15 TO-TftPE < RETURN) 

DIT HOUDT IN DOT SCREEN 0 TOT EN MET 15 WORDT GELRDEN. 

3 7 TO-TftPE < RETURN) 

WIL ZEGGEN DOT SCREEN 3 TOT EN MET 7 WORDT GELODEN. 

7 7 TO-TftPE < RETURN) 

NU WORDT PILLEEN SCREEN 7 OP DE BAND GEZET. 

HET BEELDSCHERM LftftD ZIEN MET WELKE SCREEN HET PROGRftMMfi BEZIG IS. 



SCREENS VftN DE BftND HftLEN 

EEN GEMftflKTE SCREEN VftN DE BftND HftLEN IS EIGENLIJK HET OMGEKEERDE VftN OP 
BftND ZETTEN. 

TOETS INS 



0 15 FROM-TftPE < RETURN) 

DIT LftftD PROGRftMMft 0 TOT 15 IN HET GEHEUGEN (BORDER 0-15) 

3 7 FROM-TftPE < RETURN) 

DIT LftftD PROGRftMMft 3 TOT 7 IN HET GEHEUGEN (BORDER 3-7) 

7 7 FROM-TftPE il^TURN) 

DIT LftftD ALLEEN PROGRftMMft 7 IN HET GEHEUGEN (BORDER 7) 

HET BEELDSCHERM TOONT MET WELKE SCREEN HET BEZIG IS. 



LOAD 



HEEFT MEN B. V. PROGRftMMft 3 TOT 7 GEL ADEN DM DIT MEE TE LRTEN WERKEN MET 
HET FORTH PROGRAMMA ZULLEN BORDER 3 TOT 7 IN HET VOCABULARY GEVOEGD 
MOETEN WORDEN. DIT GftftT ftLS VOLGTs 

TOETS INS 



3 LOftD (RETURN) 

NU WORDT SCREEN 3 CELftDEN. MOCHT SCREEN 3 AfiNOEVEN DAT DE VOLGENE 
SCREEN ER BIJ HOORT, D. M. V. — > DAN ZAL OOK SCREEN 4 GELADEN 
WORDEN ENZ. 

iI»«>IGT SCREEN 4 MET iS ttm STOPT HET LADEN VAN HET PROGRAMMA. 
MEN DIENT DAN < 5 LOAD i IN TE TOETSEN OM HET VERVOLG TE LADEN. 



LUOD'SJaMOIjAHOp'MMM 



lEl ' — » I 1 ■ — ' KEIMMER 



NAflM INSTRUKTIE 



''■RIP*^ GEEFT DE irslHOUD VftN DE EERSTVOLQEf®E 3 SCREENS OP 

***** BEELDSCHERM 



17E5-381ft 



ADREd 


DATA 


INSTRUKTIE 






37E5 


85 




*B5 


ni-ii>i 1 ML- l—C 1 1 cr\0 VHN 1 


nfe.1 WUUHD i'^wBm) 


37E6! 


54 


T 


«54 




37Et 


m 


R 


♦52 






37E8 


49 


I 


*49 






37E9 


41 


A 


«41 


—ASCI I &Zl1 =0 




57Eft 




D 


*C4 


— ftSCIl Anzt— ^R(7i=*A/i— n 




37EB 


B0 37 


JMP 


*37B0 


— ftDRP*? unf npKin unnpn 

nL/r\co VMl«ilJC»nlL/ WUUrXU 




37ED 


DB 25 


JMP 


*25D6 


— S QTQOT 
■ w> I H rc 1 






75 26 


JSR 


♦2675 


-3 


37F1 


B3 31 


JSR 


*31B3 


/ 




37F3 


75 26 


JSR 


*2B75 


-3 






44 31 


JSR 


«3144 






37F7 


75 26 


JSR 


*2675 


—3 




37F9 


08 25 


JSR 


»2508 


-OVER 




37FB 


99 24 


JSR 


*2499 


— 4- 




37FD 


22 25 


JSR 


*2522 


-SWftP 




37FF 


DE 21 


JSR 


»21DE 






'wmt 


F4 22 


JSR 


♦22F4 


-CR 




3803 


F7 21 


JSR 


*21F7 


-I 




3805 


78 37 


JSR 


*3778 


-LIST 




3807 


77 21 


JSR 


*2177 


-(LOOP) 




3809 


F8 FF 


JMP 


*3801 


SPRING -8 


ADRESSEN 


380B 


F4 22 


JSR 


*22F4 


-CR 


380D 


67 10 


JSR 


♦2067 


-CLIT 




380F 


0F 


BYTE 


*0F 


-*0F 




3810 


6C 33 


JSR 


♦336C 


-MESSAGE 




3812 


F4 22 


JSR 


*22F4 


-CR 




3814 


67 20 


JSR 


$2067 


-CLIT 




3818 


0C 


BYTE 


»0C 


-♦0C FORM FEET 


FOR MONITOR 


3817 


D7 22 


JSR 


*22D7 


-EMIT 


3819 


0C 24 


JSR 


♦240C 


-;S 





SCREEN 77 

0 ( PROGRAM DOCUMENTATION WFR-200479 ) 

1 HEX 
2 

3 

4 

5 

6 

7 

8 

9 
10 
11 

12 : TRIAD C PRINT 3 SCREEN ON PAGE, CONTAINING # ON STACK *0 

13 0C EMIT ( FF ) 3 / 3 * 3 OVER + SWAP 

14 DO CR I LIST LOOP CR 

15 OF MESSAGE CR ? 
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LUOD'SJaMOIjAHOp'MMM 



E 5 D S 









INSTRUKTIE 












VLIST 






GEEFT 


ALLE 1 












381B-3e63 








RDRtS 


DftTft 


INSTRUKTIE 


3B1B 


85 






«85 


3d1C 


56 




V 




3oIU 


4C 




L 




Td 4 C 


49 




I 




"TO 4 C 


53 




S 




To^m 

3Oj£.0 


D4 




T 




TO^ <f 


E5 


37 


JSR 


37E5 


TOOT 


D6 


25 


JSR 


25D6 


Tooec 
3oZD 


6720 


JSR 


2067 


TO^Tf 

3o^7 


80 




BYTE 


«80 


TO'TiO 


29 


27 


JSR 


2729 


3d2h 


9D 


25 


JSR 






4B 


27 


JSR 


274B 


T O C 


79 


25 


JSR 


2579 


TOTO* 

3d30 


79 


25 


JSR 


2579 


-TOT'<^ 

3o3Z 


29 


27 


JSR 


2729 


TOT /• 

3d 34 


79 


25 


JSR 


2579 


TOTC 

3o3o 


88 


26 


JSR 


2688 


TOTO 

3S38 


3C 


28 


JSR 


283.C 


TOTrS 

3S3H 


56 


21 


JSR 


2156 


-r f-\ T O 

3S3C 


0fl 


00 


JSR 


000ft 


TO "> t- 

383E 


F4 


22 


JSR 


22F4 


TO /. Ok 


5D 


26 


JSR 


265D 




29 


27 


JSR 


2729 


3844 


9D 


25 


JSR 


259D 


3846 


30 


25 


JSR 


253ft 


3848 


02 


2E 


JSR 


2E02 


384A 


5E 


28 


JSR 


285E 


3S4C 


5E 


28 


JSR 


285E 


384E 


Eft 


28 


JSR 


28Eft 


3850 


B8 


28 


JSR 


2BBS 


3852 


79 


25 


JSR 


2579 


3854 


3ft 


25 


JSR 


253ft 


38SE 


73 


24 


JSR 


2473 


3858 


ED 


22 


JSR 


22ED 


3S5A 


OD 


23 


JSR 


23ftD 




56 


21 


JSR 


2156 


3S5E 


D4 


FF 


JSR 


FFD4 


3880 


19 


25 


JSR 


2519 


3862 


m 


24 


JSR 


24ec 



-ftftNTftL LETTERS VftN HET WQORD (-♦®0> 

-ASCII *56=V 

-ftSCIl *4C-L 

-ftSCII *49«I 

-ftSCII *53-S 

-ftSCII ♦D4-«tB0»*S4*T 

-ftDRES VOLGEND WOORD 

-: STftRT OPBOUW VLIST 

-CLIT 

-*B0 CI27) 
-OUT 

-CONTEXT 

-a 

-OUT 

-a 

-C/L 

-> 

-0BRftNCH 

-CR 
-0 

-OUT 

-DUP 

-ID. 

-SPftCE 

-SPftCE 

-PFA 

-LFft 

^a 

*DUP 

-0= 

-?TERMINftL 
-OR 

-0BRftNCH 

-*FFD4 

-DROP 
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LUOD'SJaMOIjAHOp'MMM 



2iE 5 a s 



KEIMMI 



SCREEN 78 



0 
1 
2 
S 
4 
S 
6 
7 
8 
9 

10 

11 
12 
13 
14 
15 



< TOOLS 
HEX 

8 VLIST 



WFR-200478 ) 



— > 



< LIST CONTEXT VOCH^UIRY * ) 
80 OUT • CONTEXT S S 
BEGIN OUT Q C/L > IF CR 0 OUT ! ENDIF 
DUP ID. SPftCE SPfiCE PFft LFfi S 
DUP 0= 7TERMINAL OR UNTIL DROP I 



mm 



HON 

l|«i»Sl|! 



INSTRUKTIE 

KEER TERUG NAftR JUNIOR MONITOR 



38E4-38SF 



ADRES 

38B4 

3865 

38E6 

3867 

3868 

386A 

386C 

38EE 

3870 

3873 

3875 

3878 

3B7B 

387D 



DATA 




INSTRUKTIE 




83 








*83 


-AANTAL LETTERS VAN HET WOORD C-*80) 


4D 






M 


»4D 


-ft^I I «4D»M 


4F 






0 


i4F 


-ASCII *4F=0 


CE 






N 


*CE 


-ASCII $CE-*80=*4E=N 


IB 


38 




JMP 


«381B 


-ADRES V0LC3END WOORD 


6C 


38 




JMP 


«38BC 


-JUMP NftftR OP^tW WflON" 


8B 


85 




STX 


*B5 


-XSAVE 


A9 


5F 




LDAIM *5F 


m mCU MET «5F 


&D 


7C 


lA 


STA 


*lfl7C 


-EN ZET DIT OP ADRES *1A7C 


A9 


10 




LDAIM $10 


-LAAD DE ACCU tIET *10 


8D 


7D 


lA 


STA 


*1A7D 


-EN ZET DIT OP ADRES »1A7D 


4C 


5F 


10 


JMP 


*105F 


-JUMP NAAR JUNIOR 


A& 


B5 




LDX 


*B5 


-XSAVE 


4C 


44 


20 


JMP 


«2044 


-JUMP NAAR NEXT 



•orth voor junior 



FORTH voor JUNIOR is ysrkn ^qL}aa^ oz oand ccor Fl, 12, 
schrijven od oostreKenina 341433 t.n.v. k.L. van Peit 
a. d. iJssel of door bi ischri wing oo banK re-<eni riG 4^. 
t.n. V. L- vavi Pelt bin ce ftl^RG-bank te KruYiDen a. a. 



ever te 
I. 05, 471 



De docuiYientat leset bet ref f ende FDRTH, bes^^aancle uit: 

-6502 flsseiYjQlv Soarcellst ino 

-Instai iat ion Manual 

-Forth 79 Stancard Conversion 

-F'orth 79 Standards 

kunt U verkn.iaen door FI.45., == over te schfiiven oo Dost fe-<enina 
5253572 t.n. v." HCC-FIG te Zexst. 
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5 □ 5 



Door Ruud Uphoff. 

[k s! ittsie dinaen de basic interpreter te kurmen doen is het t!odi9 m een aantai routines te Kennen. 
i3nderstaande lyst seen de belan^rykste standaard labels. Daarna vol9t een beKnoPte toelichtin? op eike 
routit^. Van sen mm ifmxim m ^Wi^Miii^im ures \i\et xid\9 X9 ?me?t Krvi^, »iiT \k 
wiide aet deze ivst niet ianaer ♦achten. Qok de functies die irs de ''P"-versie van de Junior basic ont- 
breKer. zyn noa met opgenomen. £r zulien zich trouwens in de toekwist nog net iKier aevailw voordoen» 
«Mati>y een nos ni«t bekende rootiRSt aisnos t^rschvn aehutd toet mrm. 



iMummm m m m vie C84 jun kim 



Goaiarid MhM C55D C553 K4B C644 fi544 2455 2523 

CQH»&nd CLEAR CS79 (^A » iSE8 M7\ 2S3A 

CoMfiand RUN: C7S5 C775 DS18 CE53 flG59 2453 2537 

Conaand GOTO C7C4 C7B4 D955 C8BC flSBC 274C 28B9 

m mt mstmim eeu mz ms 

Operator m CKF a)E8 - CED4 SED4 2CA2 2DS5 

Operator OR lECS GED6 - CFE5 flFES 2D45 2E84 

Operator <»iD €£CB CED8 - CFE9 flFE3 2D48 2Ea7 

Gssrator mm D736 D728 £7fifi D853 B853 3594 363^ 

Operator PLUS D77S D73F E7C1 DSSfl BSfift 35fffl 3656 

Operator i&Tm.Y mf mm 'mm jmwm w^wt 

Operator DiVIDt DfllE D9E4 EftS3 D80F BB3F 38DF 338ft 

Operator POWER DE58 DE2E tEi7 0F7B BF78 3D21 3DCC 

Operator iBftTE mm. SE67 EEBf 0FB4 BFB4 SfiSft 3^ 

?oriction LEN SG56 D654 E5DS D77C B77C 34BC 3573 

function VftL M87 D585 E7B7 D7rti) B7fiD 34ED 35^ 

function L8G 08F5 0^ ES41 89ER SSIft f?BS 

Furicticn m DB45 DB8B EBSS! DC3S BC39 3305 3flBI 

function m DB64 DB2a EBflF DCSS BC^ 3fl25 Zm 

Fosction m 0BD8 D89E iC23 DCCC BCCC 3fl38 3B44 

=^uncticn SSR DE5E DE24 EESD DF7i BF7i 3D17 3DC2 

Function tXH DEDft DEA0 mS DFED BFED 3D33 3E3E 

Function m 0F7f OF^S EF^ £1^ W& WiB 

Function COS DFD8 DF9E EFEfi £264 3F1F 

Function SIN DFDF DFA5 E^Fi £26B 3F26 

Function TflN BK8 DFEE FBSfl E2B4 3FC3 

Function flTN EflSC £048 F83E E30E 3FB2 

RESTftRT C389 C38B EIM3 C483 8384 2278 2348 

mm mi tm m% tsss ms 2329 23F1 

ETLINE C45F C468 flSS C56B fi568 235C 242G 

ENCODE C495 44^ 0559 C57C A57C 239C 2466 

RESST CS93 C584 D683 £S7fi ftSTfl 2488 25K 

[ETPTR C5fl7 C59i^ D637 C5SE 96SE 249C 2568 

EXECNXT C6C4 C5B5 D7D2 C7ftE ft7fl£ 25fl5 2674 

EXEscuR m ma nees tm ^ m wm 

EXECTDK C780 C5F2 D828 C7ED fl7ED 25D8 26fl4 

COLNUHB ES73 C8&3 OflilC C36B ft96B 27F6 28B8 

PRSTRVA CmC Ot27 DB3fl CBIE fiBlE 2958 2A18 

EVflLEX CC9F CCbS DD7B CD9E flD9E 2B58 2C48 

GETPftR CDEC (£85 0EB2 CEFI flEFl 2CBF '2D82 

CHCKfiLPH CFF7 DfleS EI7B 8113 8113 mi 

finm 0e9ft ok? EliC SIBF BIBF 2F04 2FC2 
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LUOD'SJaMOIjAHOp'MMM 



MFLP 




0278 E2F2 


0391 B391 


3BD7 


3195 


NONDRCT 


0280 


D28B E30G 


D3AG 63A6 


38EA 


3lfl8 


CHCKTYP 


CC31 


CCflA OD&D 


cose AD38 


2B77 


2C3ft 


8ETSTR 


D363 


D36D E3ES 


0489 B489 


31CD 


3282 


DSCRDSTR 


D57D 


D57S E5FD 


D6fl3 8603 


33E3 


349A 


lUiG 


D123 


0138 £139 


0248 B24S 


2F8D 


384B 


mm 


flG75 


D673 EEF5 


D79B B79B 


34DB 


3592 




0602 


D6D0 E754 


D7R B7F? 


35.38 


35EF 


GETFlPYfl 


09S8 


D95E E9E3 


DA8C BA^ 


3859 


3904 


wm 


09EE 


D36B Efl39 


DflE2 6AE2 


38ftF 


395A 


TENTH 




D9D0 EflSS 


DAFE BAFE 


38CB 


397S 


GETCJiiSTYfl 


m£ 


Dfl74 £flF9 


DBA2 BBA2 


396F 


3A1A 


COPY 


OSes 


DflCE EB53 


DBFC BBFC 


39Cg 


3A74 


YPOC 


DBIS 


DflDE EBS3 


DC2C BC0C 


39D9 


3AS4 


CCTFLPfl 


DB48 


DB0E EBS3 


DC3C BC3C 


3A09 


3AB4 


CMPFLPYft 


SB87 


DB2D EBB2 


0C5B BC5B 


3A-28 


3AD3 


FLPFM 


DB7fl 


DBSD EK^2 


DC9B BC9B 


3Ae8 


3B13 


ClRFflC 


DBFS 


DBBB EC49 


DCE9 BCE9 


3AB6 


3B61 


STHFLP 


DBFF 


D8C5 £C4ft 


DCF3 BCF3 


3AC0 


3B6S 


FLPPLfi 


DCSfl 


DC5B ECD5 


DS7E BD7E 


3B5F 


3C0A 


PRNUMflX 


DCD9 


DC9F ED24 


DDCD BDCD 


3BflE 


3C59 


apsTs 


DCE9 


DCflF ED34 


DODD BDDD 


3BBE 


3C69 


GETNXTCH 


0070 


00C2 00B1 


0073 0073 


00C9 


0aC0 


TXTPTR 


^77 


00C9 00eS 


0e7ft 007fl 


00CA 


8eC7 


GETC'JRC 


0876 


00CS 00B7 


0079 0079 


08C1 


08CS 


FflCl 


005E 


0060 00SD 


0861 0061 


08B1 


0eA£ 


FflC2 


00S6 


00B8 00A5 


^9 0069 


08B9 


08BB 


TEKP 


001F 


0271 a05E 


0022 0022 


0072 


00&F 


PTRSTR'!' 


0023 


007fl 006? 


002B 0026 


087B 


8878 


TXTftREA 


0400 


0400 0800 


1000 0800 


4000 


4041 


BLfFER 


0200 


0e0A 0200 


0200 0200 


001E 


0018 



BeknoPte toelichtins. 



Functtfs 



RESTART 
RECOHP 

GETLISE 

ENCODE 
RESET 

GETPTR 



i^lie cottttando's die hler zyn geseveni Kunnen vanult nachinetaai worden uitsevoerd, 
Voor het cottttando GOTO dienx hex rweinuflwer eerst in de Pointer Nlfri te worden tezet. 
Ai le hier owestvert btsic ftincties mm rechtstreelcs vanult nachiwt^i nordeTt uit- 
sevijerd. De opertnd noet in de ^iP-accu«ulator staan. 

fli ie operatoren die hier zyn opseaeven Kunrien vanuit mchinetaal wrden uitaevoerdi op 
mef nanier^' 

-LinKer operand in de tweede f Ip-accuwulator en reenter operand in de f lP-accu«u}ator. 
Voordat ien de routine aanroept noet wen de exponent van de flP-accuftwiator in de ac- 
cifMtfiatof laden CM mi)n 

*Rechter operand in de flP-accu«uiator en het adres van de linker operand (5 byte f!p 
fetal) in de registers Y(h) en ft(l). Roep de routine aan op het flflNGEGEVEN flDRES mm 
DRIE 

Ha rise start van de basic interpreter, flfdrukken van 'REflDYS 'CSC of pro«Pt. 
Recompute links. Herberekent aiie links voor de reseinu^iers. routine eindin in ftPPLE 
en KIH m et net RTS «aar mt JHP i^TRRT 

Leest een resei in het input buffer. Deze regei kOMt neestit van het toetsenbordt tmt 
kan ook van een randapparaat Koeien (lEiiiKf tlPt}* 
Coc^rt de basic sleotelnoorden rn het mm tofftn 

Hag zonder »eer vanuit aachinetaai en vanait BflSIC nofden aanferomiu Liit trie 
variabeien intact ciaar reset dte stack. 

Zet hei betiA adres ^ m basic Prmmm it TXTPTR. Dn is het adres van de 'du«my 
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S D S 



KENNEIR 



mm 

mm 

EXECTGK 

mMim 



GETPfiR , 
GETlTfi 



ILLEG 
GETIWX 

FLPlitUilB 

IHTPE 

TENTH 

GETCNSTYfi 



end of line' aan het besin van het prograii»a. 

Execute t^xt stateateKI. Si «^lli»lliffiif ii^ f^r mm m m^r de dobbete m$ 
mzm VQOT EXECNXT wordt aanseroepen. 

Execute current stateoent. Leest het voigende Karakter in het Praraiima, Dit wordt 
beschouMd ais een ttimi statai^ m mmmm, tmmm mm m mim^e state»eftt 
uit^evoerd. 

Execute statesient toKen. flis E)(ECCUR. Het eerste Karakter fa»?et reeds in de accunuiatcr 
staan. 

Leest eeri se^al =< S3393 in ASCII vana+ het ad res in ^XTPTR en zet dat 9etal in 
locaties NUHE en M^l. 648Sttl en hoger seen ?SVNTflX ERROR maar er is een BUG in aiie 
^titetpreters ! £r bestaat tiiuiiii^ mm^ nairby inttmnief fastloont die ymi 

diverse «a:hines verschi 1 !er:d 's^ 

Ai le Cotftftiodore i«achjnes5 352728-353279 

mB 737762-448315 

m mmi 348ise-352?is 

ikm rouVii*e wordt ook door ce jvaerpreier sefaruiKt ais U een reaeinuffifter intiKt. li 
Sen ii eerder 9enoe«de iccatie o« te onthouden. 

f'^M It ring pointed by Y/a, DruKt een tekst af. flan het einde var; de tekst «oet deze 
alitift^ tm mt em %rte Wi. fianroepen m ^ MiMriiip^ tm 
Y^ilits$#r (h) er acc'^^^yia-^or ' 254 bytes. 

Evaluate expressior^. Rekent de v^-aard^ uit van een expressie. Voor het aarirceaen met 
de tek&t pointer r^aar m tm^m mi^ m m^m^w wmm^ tmi 
gecodeerd zyn. Resuitaat in de f:P a:cj. 

Qet parenthesised value* Eva' ueert eeri express le <2ie EVfiLEX) die t^hter tuss-?:i haak- 
Pes ifioet staan. • ' ' . 

Cseck to^ alphabetic iltti^if- llin^eir - in de accu^itdT.,- !n«i«!S'fl-I S^i mi^\%m 
C=l. Anders C=a . ' r^:'^'-'. ■ ■ ''^ " 

Floating P^itit to iMeger. {kmvtfiiefl i§ tlti 1km fm^ een tmee bntt ^% 
co«Ple«aent integer. Dese vindt U dan terug rn FAC+3 (h) en FfiC+4 
integer to floating point. De integer «oet v<crden geiaden in acujttuiator (h) en 
f*ffgiil#f (0. Resuitaat m% »n ^ flP accu . 

Check tor non direct «odei ^^MP mm ten foutJfteiding iisdi^ m mmt 
5tate«»nx wordt Uitsevt^rd. 

Controieert of een expr^ie van het jutste ty» is. txpres^ie it f ip accu* (f tP fetal 

of string descriptor). Geeft -^cijtfneldiT'g iJid'iK^ ^erl^^ei^^^iN^ 

SEC indien de expressie een string ft»et zyn. ^feders 9.C» 

reest een str-ng uit het geheuten ln de f rt* accu* Be string sioet et*^digen mx 

speciaa^ ur.iek karakteri dat ool*. vcor aanroepen ir^ het X-register «D?t worder; B.^^ladc-nv 

Net beeinadres van de stringtekst aoet worden geiaden m het Y-resister (h) er? ac-^ 

cufftuiator (f), Max 256 bytes. 

Verwydert een string die U in een routine niet «eer nodig hebt van de stri^;g stac'< en 
zet het adres van de string in pointer TEMP. U hebt deze routine n^^ig oi» zelf USR 
routines te schryven van de voms flsigR(fl$). Ver^et mn deze routine un te roeP^i 
dan volst na de derde aanroep van uSR de fout^^lding FiHii WR ilSISt* 
Fout«elding '?ia£6flL QUANTITY ERROR' 

Evalueert een express le die een resuitaat ( TSB iioet op^everen finders voigt een fout- 

fneldiTig, Het '■esultaat staat in het X'-reg 

Convert flp to nuwber. Converteert de f»P accu naar een adres in NUHB, Hoet liggen 
tussen 8-5S535. 

Leest een f 1p getai op een adres dat staat in het Y-register (K) en de «!:cuiulator 
(i). Pt& op: Het resultaat ko»t in tip accu 2 ! 
Ifffimifvutdfgt !fe fip accu iet 1€ 

Dee It de flP accu door 18 

Leest een f ip getal uit het seKeugen in de flP accu. (variabeie ophaien) Het adres van 
^PORent Moet ia het Y-r«ister (h) en m de «:ct^lator (i) staan. 
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COPY 

ypoc 

CMPFLPYfl 



FLPFINT 

aRFflC 
STflFLP 

FlPPLfl 

PidUHRX 

FLPSTR 

TX-TflREfl 

FhCI 

FflC2 

BLfFER 

TEMP 



TS[T?T8 



nmm 



FLP notatie 



^ ice '■end. ite 



Copieer fiP accu 2 in fip accu 

flit tmmmm CPf^ wm mm m ^tmim* 

Zet de waarde uit de accwRfftl^ <-127 128) aib f !p geta! ir? de fi? accu, 
Het adres van een fiP aetai in Y-rwlster (h) $n accuttuiatc^r (i) worden s&iade^, 
Se routine verseiykt dat flu 9ttar »et d^ fii de f ip acctjemlater. M reby^tait N)«t 
in de accuttuiator (1^B»-1) 

f^iet te veniarren net FLPINT. Deze n^utine ievert een 4 bn^ coaPieiT».ent int^se'- 

ifi de fractit ttflis ^ die ffn aati. 

LDfi #$201 dan JSR ClRFflC zet NUL ;n de flP accu. 

Converteert de string (descriptor) de ftp accu tot een f !p ieta?. Verieet daarna 
I^fiS^ Biet f 

FioatiTsg PclM acco Pte ft. Tilt rfe two's conpi^aent naaris de acctiSJiator m bf de 
f ip accu. 

S&n Roiwer wrdt wl^eii in de actufiiuiator (h) e?^ in Xre9. (?) Bese waarde mm 
door aanroepen van de routine a-^gedrukt. 

Converteert de t'lp accu tot een string. Resu*taat: String staat cp adr^ ^IW en -is 
afs^}€lei m IM 
letin van het ba^ic Prograf««a, 
BHin van de f IP accu (6 bytes) 
9mm mm li# acco 2 f S mes) 
Adres van het faegif: van s?t basic i-fput buffer. 
Een ai eerder genoefade locatie m te ontho^jt^. 
Beze routine leest het voim«fe karaicter tfit fe basic tekst. 9e 
*te er il;^voer{ger op ingaan, De routine staat op cagi^a 2 9ri is 2=== -f /lod 
PoiTiter TXTPTH is naweiyk tevens de operand van een \M (afesolute) 
routine verlc»0Pt a Is YO!«ti 
8878 £6 77 (»HXTQ4) 
an D3 82 
8B74 E6 78 

8876 flD XX XX {GE*^CU!?CH, XX XX :s '^XTPTR) 

VoQrbeeid uit de CBh* Probeer dit eens -fatsotr:lyK aan een assembler te verteiien ! 
Herieeft het faatste byte van het basic Progra^na. 

Een pointer d:e wyst naar het byte waar de basic interpreter ""m^ bszi?" \l zou 
byte ook kunnen lezen ietJ LDY #*a8 ea dan IDA iTXTPTR),Y Hst kan rechtstresKs 
8P01E8 mm m mmm m mtm il vat* etn m instruct ie. 
Op dit adres begint een serie Pointers op Pag^na I die het voliemie te mm tebbeiit 
voora! tydens de executie van een prograitta^ 
^ » Betrn van de basit Ptograwia 
82 Begin van de gewone variAl^. 

04 Begin van de aray's. 

8B Begin van het vrye geheugen n.a de aray's. 

05 fegin van de actuele stv ingtekstrulfftte, 

8B Begin van het vrye geheugen na de stringtekbten. 
K l&fin van de eerste niet-!»¥! locatie (einde geheugen) 

Vcor 10012 schryven ^ 10^3. Evenze voor 133 '1,33 * 12^2' IferK op2 Het cyfer voor de 
Koffi«ia is nooit 8 en de exponent geeft het aantai cyfers voor de koft».«a ^i-nus oen aan. 
(133 heeft 3 cyferstlBBB heeft h cyfers) Hetzeifde gaat ook binair^ \M :s binair 
110.8100 (f^x 164). «e kunnen daarvoor ooK schryven^ 8111^118 taal ti^ tot de fiacht 
zes. fticrosoft noteert de coefficient in 4 bytes: 
ItiittiBe. 88888888. 88088888. 88888880 of hex 08.80.80.00 
en noteert daarvoor m mmmm w m SJms^ mmm.mm^ m 

flangezien het leerste bit van de coefficient ^KDk hier nooit nui kan zyn. is dat dus 
altyd een 1 en dus is dat bit ais teken (+ of -) te gebruiken. Hicrosi^ft gebrulkt 1 
voor ftiin en 0 voor Plus, Hiil Is mm in ftMoiatie weer te »ven, Baaroi mm eer^ 
true toegepast. De exponent wordt verweerderd wet $81 genoteeerdi zodat $81 een ex- 
ponent 8 leergeeft. Op deze «anier zyn exponenten < $81 nesatief ers kan sen afspreken 



dat 
istot 
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dat e«n fetal nut fs ars de exucmeftt 1W r&. \teor ^luiii Jit sliit 4^ 
I87.68.08.ISI.WI lencteerd. In de f iP accuisuiator (niet in de variabeler) wordt een 
zesde byte loeaevoesdi iiaarin het teken wordt tezet. de notaxie in de fip-ac- 
cuttuiatoren is dan: $fff.^.li.iJ.mlR warby de 11 It m tiart^e ifte laween dat 
tet seta! posit ief is. Een negatief teken heett $-ff in het zesde byte 
Een tmi Staat in ascUi zoals U hen heeft inset ikt in het seheusen. Sleutelwoorden zyn echter 
tot een byte '(^^^ik mamm. M tmi mmm t^m m 'Wkm^ mm net een byte 
$00 (End of iir^)* ien reseinu^Mer neeat 4 bytes in beslag. De eerste twee worden de 
LINK smm^* fe Uih) het adres van de voisende reset iOoK »eer een link). 

S^rni staat in ti^ bm^ m r^imimr (lih)» De cq«^s voot si^teinoorden i^nt U 
?n UN versie sefttakKeiyk vinden door aiie bieuteiwoori^ in te t3^ w seniJiaierde 
reseis en vervolsens in het seheusen te kyken. 



Cassette Library 



The cassette library is free available for all members of the KIM 
Users Club the Netherlands by orderft^ €itflis#%tii€^ nf oaioerMare. 

The paperware service given by the KIM Users Club The Netherlands 
exists of providing source-1 ist inas and articles published in our 
/fiagazine DE 6502 KENNER. 

The KIM Club Cassettes have been written in the KIM/ JUNIOR hyoer- 
tape format, unless declared otherwise. 

Programs on ^aiNiette are develooed by members of tfc» club, mostly 
published in our clubmaoazine DE 6502 KENNER, or ndaotations 
f roii PIRST BCMIK OF KlM. fill rights of the authors are reser- 
ved. Cassette costs serves costs or transoorts, the cassette it- 
mm%f atyidaiminist rat ions only. 

All progipms have %iH»n diyioi on c:aii«ette twice. The cassettes 
have been checked on fll^libilltf pl^fi %p»l€aim^ soeed. 

PROBLEMS WITH REftDINi TAPE 

The system with whicfh cassette mkm, is composed HiMh two 

PHILIPS D6410 mono recorders under comouter control. By llli use 
of other recorders there may be some difficulties with tue rea- 
dines of tapes. Folliiwiiif Mill #|#tst i^m^m give good t^^ 

suits. 

1. Clean head of recorder with soft tissue, wetted h&fth alcohol, 
or something similar. 

2. Listen to the sound of recording, ftdjust tone-regulator/switch 
on maximum high tone level. Now'adjust head of recorder with 
a srew-dri ver" t i 1 1 tones are as sharo as possible. Don't for- 
get re-adjusting the head of the recorder for reading fro«i or 
saving on your own tapes- 

3. If the hints above won't work, then plua in a voltage-aieter on 
the outout-port of the PLL. Play recorded oroarams and reaula- 
the PLL--oot till « ti^stofi of ea» M^m^ im f«iihed. 

This ext reme measures are mostly not necessary. 

The coding is the machinecode to perform by the computer. 

The Micro-PDE source is the assembler text' and only usable with 

the Micro-ADE assembler/disassembler/editor. 

The Basic source is the Microsoft Basic with a work-area begin- 
ning at address $2000. Cassettes are made; witti S¥M-1 Microsoft 
Basic patched for JUNIOR. 

We will soon have cassettes with Microsoft Basic with a work-area 
declared by the KB3 Basic. 
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*:4:4:jf:*:*:>t:*:+:H-:4:it:>f:**4:***!*'t:+:>f:4"4:***4:>f:**4:**!*'t^ 

•K:>f:4:>»:>f: ::::::::::::::::: G A L G J E :::issss::ti:ss::»>i« 

ftUTEUR : D. M. Verzijden 
van A 1 mondeweg 
3231 m BRIELLE 

DIT PROGRftMMft WERKT OP EEN JUNIOR MET INTERFPlCEKftfiRT 
EN TERMINAL. GEHEUGENBEREIK: 2K RAM. OP DE PAGINft'S 04. 
05, 06, EN 07 BEVINDEN ZICH 128 WOORDEN VAN ELK 7 LET- 
TERS. ELK WOORD EINDIGT MET EEN ETX. HET PROGRAMMA LOOPT 
VAN ADREB *0200 TOT $0350. DE TEKSTSTRINGS BEVINDEN ZICH 
OP DE ADRESSEN *0351 TOT *03FE. HET PROGRAMMA PRESEN- 
TEERT DE GOED GERADEN LETTERS OP DE JUISTE PLAATS IN EEN 
PUNTENRIJ MET DAARONDER DE FOOT GERADEN LETTERS. NA HET 
STARTEN EN PRINTEN VAN DE AANVANGSTTEKST MOET EENMAAL 
EEN SPAT IE WORDEN GEGEVEN DM EEN WILLEKEURIG WOORD TE 
GENEREREN UIT HET BESTAND. HET WOORDENBESTAND KUNT U 
ZELF SAMENSTELLEN. ALS HULPMIDDEL GEBRUIK IK EEN BIMPEL 
PROGRAMMA, WAARMEE ftLLE 128 WOORDEN DIREKT INGEVOERD 
KUNNEN WORDEN. 

GALGJE ORG *0200 

; ZERO PAGE VARIABELEN 

TELLER AANTAL FOUTEN 
INGETOETSTE LETTER 
GOED/FOUT MERK 
TELLER AANTAL COED 
RANDOM GETAL 
SPAT IE TELLER 
e. V. GOED GERADEN LETTERS 
e. V. FOUT GERADEN LETTERS 
e. V. TE RADEN WOORD 



02 

03 


00 


WRCOUN 


$0002 


00 


GUESS * 


$0003 


04 
05 


00 


GOWR + 


$0004 
$0005 


00 


GOCOUN * 


0G 


00 


RAND * 


$0006 


07 


00 


BPACO ^■ 


$0007 


i.0 


00 


GOGUES * 


$0010 


23 


00 


WRGUES 


$0020 


30 


00 


WORD * 


$0030 



; MOhJITOR ROUTINES 

5F 10 LABJUN * $105F 

AE 12 RECCHA + $i2AE 

34 13 PRCHA M $1334 



F7 lA 

m lA 



TIMER =+= 
PAD * 

J POINTERS 



*1AF7 
tlf^0 



TIMER 1024 



4E 02 
9D 03 
9C 03 
A3 02 
35 03 



FETCH 

BRT 

BRTH 

FTLTR 

PWRD 



* 



$024E 

*039D 

BRT 

*02A9 

♦0335 



-01 



CURBOS BESTURING 



0C 0C 
0D 0D 
0A 0A 



FORMF * 

CR * 
LF * 



$0C 
$0D 
$0A 
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0G50S 


0200 


20 






TEX Ifi 


J3F% 
LL'H J ri 


PI CD 

T'U 1 


0Gb0s 


h3 


51 




0G7'0 2 
0ESB s 


0205 


3D 








b i H 


PWRD 


02:08 


20 






Try r% 

JSR 


PK IMl 


0E30S 


02OB 


fi| 






IMITR 


LDHln 




0700 s 


020D 


@5 








rn -I- z*^, -y 

ST Hi. 


WRCOUN 


07i0n 
0720 s 


020F 










GOCOUN 


0-£:l 1 
0-i;l3 










LDh i M 


^ |L?| 


07.::«0 s 


OCT" 


17 






b I 


blJbUbb 
^lu / 


07a0 2 


0-£!l5 


h2 


07 






1 Pk V T fvi 

LL'X in 


13750 s 


0-i!l7 


h3 






rsr\T 


LL'H i il 




07S0 s 


B-s! 1 3 


35 






UU I b 


b ! r-i ^ A 


07 /0s 


0^1o 


Ch 
DQ 








DEX 


uu 1 b 


0/S0S 


0*::! 1 C 


Fg 






OKIE" 


0730 s 


0-^:16 


h2 


03 






LL'A in 




0S00 s 
0S10S 


0*::-£!0 


h3 






1 rsrs T M 
LuHlTl 




0222 


35 


17 




EWDTXT 


biHZX 


sy0i / 


0820 s 


0224 


Cft 








r\r-V 

DEX 


LML' \ A I 


WM: 


0225 


D0 


FB 








0840 s 
0850 s 


02^7 


R3 












0x:!-l3 


SD 


9L 






b t H 


ODT 


0b'b0 s 


0*:.2L 


SD 


R3 
31 






OTA 
b \ H 


CTT I T D 

r f L 1 K 


0c:; /0S 


0-£!-j!F 


h3 






LUHin 


0SS0 s 


0231 


SD 


dD 


0.:. 




b I H 


DOT 


0S30 s 


S234 


E6 


0b 




RRNl>On 


T Kir* 




0300^ 


0236 


2C 


30 


ifi 




BIT 


I'r*! rf*!! 9% 

PhD 


0233 


30 


F9 






B'^il 


RhNDOFI 


ii392lLJ s 


023ci 


95 


36 






t « /-I -» 
LDfiZ 

hNDIM 


RhMD 


033.0 s 


023D 




Ft) 








0340 s 


023F 


SD 


4E 


02 




BTR 


FETCH 


0350 s 


0242 


95 


06 






LDhZ 


RRND 


0360 s 
0'd / 0 S 


0244 




00 






RNDi n 




0--:4b 


03 
3D 


04 






r\Drs T M 
URRin 




0 Jo0 S 


0.^:48 


4r 


02 




b 1 R 


FETCH 


0330 s 


02 4 B 


hl0 


00 






1 r\\/Th#f 

LDYIn 




4^10005 


02 4 D 


B9 


4L 


02 


STORE 


ldrry 


FETCH 


101 0s 


0250 


C9 


03 






CMPIM 


3>0.j. 


1020 s 


0252 


F0 


07 






BEQ 


TEXTB 


1030s 


0254 


33 
Co 


30 


00 




STmhY 


WORD 


1040 s 
1050 s 


025/ 








T K I V/ 

I NY 


STUHc. 


025b 


4L 


AD 
95 


02 




JnP 


10E0S 

1 0 / 0 S 


02 5 B 






P" V*T* r*» 

TEXTB 


LDh I n 


^dp 


13^ 5L' 


3D 




0-:« 




STfl 


r*WKU 


IQd© S 


02Gt3 






0.-:« 




JbK 


PKiM f 




02b3 


Pi3 


00 




INITB 


LDHin 


*00 


1 1 00 « 


02E5 


35 


04 






S j R 


bUWK 


:l. i 1 0 s 


02 b / 


20 


RE 


12 




JSR 


RECCHh 


1 i 20 " 


02GPi 


b5 


03 






strz 


GUESS 


i i .j\u - 




bt 


dU 




bUUiM 1 


T MP 
i Wb 


ROT 

BRT 


1140s 

1150n 


02GF 


AD 


9D 


03 




LDPl 


0272 


C9 


3A 






CMPIM 


*3A 


1 i bB " 


0274 


D0 


0A 






BNE 


CHECK 


1170S 


027G 


ft9 


30 






LDAIM 


*30 


11S0S 


0278 


SD 


9D 


03 


DECIh 


STA 


BRT 


1130 s 


027B 


Pl9 


31 






LDAIM 


5-31 


i2B0s 


027D 


SD 


9C 


03 




STA 


BRT 


1210S 


02S0 


Pi2 


0S 




CHECK 


LDXIM 


$0S 


1220 s 


02S2 


A5 
D5 


03 




CHRR 


LDAZ 
CMPZX 


GUEBB 


1230S 


02S4 
02SG 


2F 






WORD 


1240 s 
1250 s 


F0 


05 






BEQ 


GOCHA 


028S 


Cft 








DEX 




1260 s 


02S9 


D0 


F7 






BNE 


CHAR 


1270 s 


02SB 


F0 


0D 






BEQ 


NUMGO 


12S0S 


02SD 


A3 


01 




GOCHft 


LDAIM 


$01 



BCHERM SCHOONMAKEN^ 
PRIMT AftlSiVWGSTEKST 



PLARTS *00 OP FOUTTELLER 
PLRATS $00 OP GOEDTELLER 

+07 PLAATS EEN CTRL J 



-il FLINTS 7 STIPPEN 



PLAATS 37 X ETX 



-01. PLAATS EEM SPATIE 

PLAATS EEN SPAT IE 

PLAATS i BZJ BEURTElNlTELLER 



PACW m EEN TOETS 



GE1MEREER ADt. TE RADEN WOORD 
PLAATS ADL 



C^NEREER ADH TE RADEN WOORD 
+01 

HAAL TE RADEN WOORD UIT BESTA^a) 
VERGELIJK ETX 

PLAATS TE RADEN WOORD OP 
PAGINA NUL 

PRIMT BEURT kk 



STEL GOED/FOUT MERK OP 0 
WACHT OP LETTER 
PLAATS LETTER OP $0003 
VERHI^ IgyiTEfelTELLER 

VER6ELI JK MET 9 



PLAATS i OP DECIMAAL BEURT- 
TELLER EN 0 OP EENHEDEN 

~0i 

TEST IMGETOSTSTE LETTER MET 

TE RADEN WOORD 

-01 

GDEDE LETTER ? 



GOEDE LETTER ! 
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1290. 

1300 

1310' 


! 028F 


85 


04 






STO 


GOWR 


: 0291 
: 0293 
: 0295 


E6 
fl5 
95 


05 






INCZ 


GOCOUN 


03 






LDOZ 


GUESS 


1320 


0F 






STOOX 




1330' 


: 0297 


Cft 








DEX 


1340 


: 0298 


D0 
fl5 


ES 
05 






BNE 


CHOR 


1350 


: 029ft 




NUMGO 


LDOZ 


GOCOUN 


1360 
1370 


: 029C 
: 029E 


C9 


07 






CMPIM 


*07 


F0 
fl5 


74 






BEG! 


TEXTJ 


13S0 


! 02ft0 


04 






LDOZ 


GOWR 


1390 
1400 


: 02fi2 


C9 


00 






CMPIM 


*00 


: 02ft4 


D0 
A5 


4E 
03 






BNE 


SPOCB 


1410 


: 02A& 




WRCHO 


LDOZ 


GUESS 


1420 
1430 


: 0203 


35 


20 






STO 


WRGUES 


: 02Plft 


EE 


09 


02 




INC 


FTLTR 


1440' 
1450 


! 02fiD 


E6 


02 






INCZ 
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J ZEE6EVECHT 
K POKER 
K POKBt 

L WMNLflNDER 
R (FSTMDSSPQ. 
M AFSTRNDSSt^L 
N BIORTTNES 
N BIORIT«S 



NR.KI!t/6S02 5A: £m 



ID NflRM 



NR. KIM/6502 Sfl! Efl+1 



2008 2im 

2000 m 

2000 2B8C 

2000 24Cfl 

2000 26Cfl 

2000 22ED 

2000 22ED 

2000 23flF 

2000 23ftF 

2000 2«62 

2000 2fl62 

2000 2970 

2000 2970 

2000 2FCE 

2000 2FCE 

2000 2FCE 

2000 2FCE 

2000 2C00 

2000 2C00 

2000 3AB1 

2000 3fl8l 

2000 3A81 

2000 3061 

lOOO 242B 

20OO 242B 

2000 2»F 
200(1 23*F 



(CURSORSESTl^RO) 
(CURSOIiBEPUIffiD) 



fl OTHELLD VI. 4 

fi OTHELLO Vi.4 

B AFSTflNOSSPEL 

B flFSTflNDSSPEL 

C SaFftSI 

C SRFPRI 

3 LEHERS SCHUIVEN(M.V.HINTU«> 

D LEHERS SCHUI VEN («. V. HINTUHJ 

E LETTERS/CIJFERSSPEi. 

E LETTERS/CIJFERSSPEI 

F GETflL VSRWISSELEN 

F GETflL VERUI8SEL0I 

6 fliJTODOOLHOF 

6 AUTOimH(F 

H 'OflUHEN' 

H "DflMCN" 
J X-SPEl 

J X-SPEL 

K VIER OP EEM AIJ 

K VIER OP EEN RIJ 
L PUZZEL 

L PUZZEL 

M UIT6EBREIDE DISftSSEWLER 

(6ERARD RDEKEL) 
M UIT6EBREIDE DISASSEMBLER 

(GERARD ROEKEL) 

PrwriMi's in de cassettebibliotheeK zijn of origineel 
van onze dubleden of faewerkingen van orograaM's uit het 
First Book of Kit, of anderszins. fllle rechten van de oro- 
oratM's blijven aan de auteurs voorbibouden. De kosten 
van dt cassette zijn allBen maar kostwdiltlMWa «l1tiiet be- 
doild M dt orooramn's te kopen. 
DE fm tS EN UDROT been KANDEL! 
Kostin per cassette: Fl. 12,50, tenzij anders vewetd. 
Bestillen van de cassette onder ooqave van naa«, adres en 
nuMer van de cassette + naaa van het systeen (JUNIOR/KIN) 
verqezeld van een oirobetaalkaart of (sneller) door over- 
schpiiving op oostfekening 841433 t.n.v. H.L van Pelt te 
Kriifvn a.d. IJssel. BestellingMi viiroit Inutmlaiid o«k oo 
iMtttgcnocidi postwkening. 
(MtrtHijiin van teitiUm zijn nitt Mgtlijk. 



2000 
2000 
2000 
2000 
2000 
2000 
20O0 
2000 
2000 
2000 
2000 
2000 
2000 
2000 
2000 
2000 
2000 
2000 
2000 
2000 
2000 
200O 



52F9 
52F9 
245C 
245C 
244B 
244B 
3493 
3499 
3499 
3499 
251D 
251D 
25E2 
26E2 
25E3 
25E3 
3321 
3321 
2980 
29fl0 
2D73 
2D73 



m m 

2000 318B 
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0010: 
0020 1 
0030: 
0040 : 
0050: 
0O60 ! 
0070 : 

ooao! 

0090 s 
0100! 

0110; 

0120! 
01S)I 
0140: 
01 50 J 



0200S 

02,:e 1 
!022§* 

0240: 

0260 J 

02#0i 

0300 1 



201 



0340: 

0350 5 

0370 s 

03905 

04x02 
0420 3 
0430: 
04402 
0450: 
0460 5 
0470: 
0^.80 ^ 
Od;90 : 
0:500 5 
05:0: 
0!f^20 : 

■:>::.4i ; 
05bu s 

0570 : 
058n 3 
059() : 
ObOr 4 
061 
0620 : 
0630 2 
0S4(>s 



2Mm 
2mm m 
2^m- ^ 
ids 

2412 m 
2414 20 
2417 83 
24ifi 10 

mm. m 

2*^C fti 
Mid 20^ 

2420 m 

2422 4C 

2425 £A 

2426 f.M 
2427 



f ? 2P 

m 

m 

if M 



3FAA 43 

3FPB ^=^5 

3FftB 55 

3FP.F P5 

3i--B^ 85 

oFB3 66 

3FB4 C9 

3FB6 DO 

3FBa 20 

3FBB 20 

3:-^BC 43 

3FBD 4E 

3FJVc 53 

3FBF 54 

3-CO 52 

3FC1 55 

3'"C2 43 

3FC3 54 

3-C4 49 

3FC5 4F 



23 00 
EE 00 
8F 12 



24 



07 
16 

F2 Fft 



* ERROR JD I SPLAY* 

Phons Bloemen 
Vink#la#ti 200 

S702 LX Jneliiftoiic 

aanceeft wat vocf error er neert 
3laat sgevonderi, en met Yieer met esn 
m«»ef« 

Deze tit OD $ 240C - $ 2427 



OR© $240C 
PHfl 

JSR $2D£7 
LDYI*^ fOft 

JSS $2DF0 ?^RmTRayT!^ic 



BEGIM OP E£N NicUW: 
PRINT iO STERRE^: 



DEY 
BPl 
S^XZ 

UDXZ 

MDP 
MOP 



$2412 



ER^2k 
S.00F5 
$25: 1 9 



i Di ME: 



PRIM 
Ph!BVT 



ERA 



$-AF2 



$0023 
$00£E 
$128F 



MEP%"** 
^;£P\T 



PHP 
lDPZ 
STPZ 
LDPZ 
STA2 
PLA 

C^PIM $07 
BKE ERB 
JiR PlINT 

' I 

'N 
'S 

3- t T 

'U 



ROUTINE u:~ JUNIOR 
P<4S-1 OF e502-K MR 2£ 



ZET D2T VEIL.5, wOR.:- 
DDOR -RlAi*- BSSRJKT ! 
+01 
+01 

ERROR NL1M?*IER 
INSTUCTIQN ERROR 
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ObSO: 

0630: 

069.:: 3 
0/00: 

0 y 1 s 
0720 ? 

073-: ; 

07^0: 
0770 5 

0 V ^ 

oaoo: 

Obli)U 
< -6S0 : 

0£au : 
0920: 

3 

10S05 

10^0 r 

1 1 . ; 
* 140: 

iimt 

: 

1130: 
1 i. 90 ? 
1200: 

i.220: 

j jZ' . ^ 
. 2UQ : 
J .J5v ^ 
i260: 
1^270 ; 
12S02 



3FC7 

3FCB 
3FCE 
3FD0 
3rD2 
3rD5 
3F;D6 

3FD8 
3-D9 

3Frp. 

3FE0 
3- £8 

3'rtD 

3FEE 

■->♦*• ::. ~ 

V • ' r" • 

3F~2 

mm 

3FFE 

4000 



4C08 

AOOC 
40CD 

4010 

40i: 

4012 
4013 
40:4 
40:5 

4016 
4017 
40 IH 
^iOlC 

40:lE 
4021 
4022 
4023 
4024 



u3 

20 P7 3E 
4C ED 40 
C3 :C ERB 
DO .4 
20 -2 FA 
20 
49 
4E 

45 
52 

49 
4- 
4E 
03 

20 33 3E 
4C ED to 
C3 23 ERC 
00 14 
2© F2 FA 
20 

44 
52 
4S 
53 

4£ 
47 

03 

20 S7 3*. 
6G Si) 40 
eg 26 SRD 
00 18 
20 F2 FA 

if 

UQ 
4?- 
16 
Mi 

•m 

LP 
55 
54 

M) 
4F 
4& 

20 
46 

ii9 
uC 
i5 
03 



4C 
C9 
DO 
20 
20 
53 
4- 
55 



3B 
14 

P2 F6 



ERE 



»03 
JSR BRRQ 
JMP EREiVD ■ 
CMPIM «IC 
BNE Es«C 
JSR PRINT 

s ' 

'I 

s 'N 
ss ♦S 
•as ' £ 

» 'R 

» ' i 

a ' rj 
« 

* «03 

JSR aVERFL 

JMP SR£\D 

CMPMn «23 

E<N£ HRD . 

JSR ORIM 

» R 

'£ 

« >S 

« » s 
« . J 

'SS 

» fOS 

JSR ERRO 

JmP £REMD 

3I^.PI(v^ $26 

JSR PRIM 

SB » 

» » 0 
« 'y 

« » T 

» • F 

'I 

a ' I 

a 'I 
« $03 
JMP EREND 
CMPIM *3B 

JSR PRINT 

s ' 
a ' S 

' 0 

» ' u 



W3VE OlT G- F 



SDJRCE TflS^-E OVE->?-L 
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1290' 


. 4025 


52 








m 


'R 


1300 


! 4026 


43 










•c 


1310 


! 4027 


45 








m 


' E 


1320 


! 4028 


03 








s 


$03 


1330! 


4029 


20 


B2 


3E 




JSR 


TABLE 


1340 


! 402C 


20 


C9 


3E 




JSR 


OVERFL 


1350! 


■ 402F 


4C 


ED 


40 




JMP 


EREND 


1360 


: 4032 


C9 


52 




ERF 


CMPIM 


$52 


1370! 


4034 


DO 


13 






BNE 


ERG 


1380 


! 4036 


20 


F2 


FA 




JSR 


PRINT 


1390! 


: 4039 


20 












1 400 


: 4030 


44 










•D 


1410' 


! 403B 


45 








« 


'E 


1420 


! 403C 


4C 








m 


'L 


1430 


• 403D 


45 








m 


'E 
»T 


1 440 


! 403E 


54 








m_ 


1450. 


! 403F 


49 








■m 


' I 


1460 


! 4040 


4F 








m 


'0 


1470 


• 4041 


4E 










' N 


1 480 


: 4042 


03 








a 


»03 


1490! 


4043 


20 


C9 


3E 




JSR 


OVERFL 


1500 


! 4046 


4C 


ED 


40 




JMP 


EREND 


1510! 


4049 


C9 


68 




ERG 


CMPIM 


$68 


1520 


! 404B 


DO 


12 






BNE 


ERH 


1530! 


404D 


20 


F2 






JSR 


PRINT 


1540 


! 4050 


20 








sr 


f 


1550. 


! 4051 


43 








ts 


'C 


1 560 


: 4052 


4F 








ss 


'0 


1570 


! 4053 


4D 








s 


'M 


1580 


: 4054 


40 








ss 


'M 


1590. 


! 4055 


41 










' ft 


1600 


! 4056 


48 










'N 


1610 


! 4057 


44 










' D 


1620 


: 4058 


03 








=: 


t03 


1630: 


4059 


20 


fl7 


3E 




JSR 


ERRQ 


1640 


! 405C 
405F 


4C 


ED 


40 




jm 


EREND 


1650! 


C9 


6F 




ERH 


CMPIM 


*6F 


1660 


: 4061 


DO 


10 






BNE 


EftI 


1670! 


. 4063 


20 


F2 


FA 




JSR 


PRINT 


1680 


: 4066 


20 








s 


1690 


• 4067 


54 










'T 


1700 


i 4068 


57 








ss 


*W 


1710 


' 4069 


49 








=: 


' I 


1720 


! 406ft 


43 








SS 




1730 


! 406B 


45 








ss 


' E 


1740 


! 406C 


03 








ss 


$03 


1750! 


406D 


20 


BD 


3E 




JSR 


SYMBOL 


1760 


! 4070 


4C 


ED 


40 




JMP 


EREND 


1770! 


4073 


C9 


9E 




ERI 


CMPIM 


$9E 


1780 


! 4075 


DO 


14 






BNE 


ERJ 


1790! 


4077 


20 


F2 


Fft 




JSR 


PRINT 


1800 


: 407ft 


20 










f 


1810. 


i 407B 


50 








s 


'p 


1820 


! 407C 


41 








9 


'ft 


1830! 


1 407D 


52 








w 


'R 


1840 


! 407E 


41 










'ft 


1850! 


. 407F 


4D 










' M 


1860 


! 4080 


45 










'E 


1870! 


. 4081 


54 










'T 


1880 


: 4082 


45 








SS 


'E 


1890! 


■ 4083 


52 










' R 


1900 


! 4084 


03 










$03 


1910! 


4085 


20 


fl7 


3E 




JSR 


ERRO 


1920. 


! 4088 


4C 


ED 


40 




JMP 


EREND 



DELETION VERFLOW 



COMMftND ERROR 



TWICE SYMBOL 



PftRflMETER E-^ROS 
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1930: 
1940: 
1950: 
1960: 
1970! 
1980! 
1990! 
2000! 
2010: 
2020: 
2O30 : 
2040! 
2050 ! 
2060 : 
2070 s 
2080! 
2090 : 
2100: 
2110: 
2120! 
2130! 
2140: 
2a50: 
2160: 
2^.70! 
2180: 
21905 
2200: 
22105 
2220: 
2230 : 
2240: 
2250 : 
2260: 
2270 s 
2280: 
2290 : 
2300 : 
2310: 
2320: 

2340 : 
2350 : 
2360: 
2370 : 
2380: 
2390 : 
2400: 
2A10: 
2420: 
2430 : 
2440 : 
2450 5 
2460! 
2470 : 
2480: 
2490 : 
2500 : 
2510! 
2520: 
2d30 s 
2540: 
2550! 
2560: 



408B 
408D 
408F 
4092 
4095 
4096 
409B 
409D 
409F 
40fl2 
4003 
40«4 
4005 
40A6 
4007 
4008 
4009 
4000 
400B 
40AC 
40flF 
40B2 
40B4 
40B6 
4089 
40Bfl 
40BB 
408C 
40BD 
40BE 
40BF 
40C0 
40C1 
40C2 
40C5 
40C8 
40Cfl 
40CC 
40CF 
40D0 
40D1 
40D2 
40D3 
40D4 
40D5 
40D6 
40D7 
40D0 
40DD 
40DE 
40£1 
40E4 
40E5 
40E6 
40e7 
40E8 
40E9 
40Efl 
40ED 
40EF 
40F1 
40F3 
40F5 
40F7 



C9 04 
DO OC 
20 BD 3E 
20 B2 3E 
20 C9 3E 
4C ED 40 
C9 08 
DO 13 
20 F2 Ffl 
20 
55 
44 
45 
46 
49 
4E 
45 
44 
03 

20 BD 3E 
4C ED 40 
C9 E2 
DO 12 
20 F2 Fft 
20 
4F 
50 
45 
52 
41 
4£ 
44 
03 

20 07 3E 
4C ED 40 
C9 F6 
DO 11 
20 F2 FO 
20 
42 
52 
41 
4E 
43 
48 
03 

20 07 3E 
4C ED 40 
48 

20 07 3E 
20 F2 Ffl 

20 
4E 
4F 
20 
03 
68 

20 6F 



IRJ 



ERK 



CMPIM «A4 



ERL 



ERM 



BNE 
JSR 
J8R 
JSR 
JMP 



ERK 
SYMBOL 
TABLE 
OVERPL 
CRENO 



DfPIi4 «fla 



BNE 
JSR 



JSR 
JMP 
CMP It 
BNE 
JSR 



JSR 

JMP 
CMPIM 
BNE 
JSR 



JSR 
JMP 

UNKNOW PHO 
JSR 
JSR 



ERL 
PRINT 

f 

»i 

*r 
»i 

'N 
'E 
'D 

$03 

SYMBOL 

EREND 

*E2 

ERM 
PRINT 

1 

rQ 
•P 
'E 
'R 
'fl 

'N 

'D 

♦03 

ERRO 

EREND 

*F6 

UNKNOW 
PRINT 

'B 
•8 

'N 
'C 
'H 
♦03 

ERRO 
EREND 

ERRO 
PRINT 

f 

»N 

'd 



SYMBOL TiBLE OVERFLOW 



SYMBOL UNDEFIiEB 



12 



05 EE 
85 23 
05 EF 
85 24 
09 20 
4C FO 2D 



OPERAND ERROt 



♦03 

PLO 

JSR PRBYT 
EREND LD02 PRPNT 
STOZ MEPNT 
LDOZ PRPNT +01 
STOZ MEPNT +01 
LDflIM ^20 
JMP ♦2DF0 



36 
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/ U • 














OC^.OA • 










CI IGtOni IT T NiCC 




o«^ar» ■ 
ZD^U • 
























uKb 




-ib 1 U « 


"?CfN7 




CO 
rjL 


rH 


C.KKU JbK 


Ci D T Kl T 




• iJfclHH 










ZboU • 


3EflB 










c 

* p 

ft 


/, A 


• »Jc:.HL/ 










CCsM • 


Ton 










ft 




« tJicHC. 










LI 


/U « 












If 
















•">C OA « 


Tcrti 1 

OtD i 


C.A 






PTC 
It 1 $3 




^ /UU 




OA 


CO 
rjL 


PH 




t*ll i W i 


-tfi / 1 U • 




OA 










^ / 


• TjTDC 

• tJrCDb 


Dm- 








» T 




• TrP7 


/i 1 








ri 


'!>*7/iri • 


• OtZ.DQ 








'SS' 




£, fUU < 


1 "TCTIjQ 
• OCD 3 


A P 










£. fW i 














jL.f / • 


AT 








4lAT 


rob 




C A 






f< 3 b 




•*>7Qri • 

Z f ijU ■ 




OA 


CO 


rH 


QVMH^ni TCP 


DPTMT 


^oW 


• TCPA 


OA 










O Q 1 f'-i 


Tcr- -f 


cr-y 








'f.'C ' 




■ Tcno 








m 


f V 

y 


iLOv>U • 


► ocLo 


A n 








' M 




• obLU 


/• o 








o 




TCP's: 










u 


2860 


: 3EC6 


A P 






« - 


' L 


2870! 


' 3EC7 












2880 


i 3EC8 


60 






irs 




2890 J 


3EC3 


20 


F2 


Ffl 


OVERFL JSR 


PRINT 


2900 


: 3ECC 


20 






S 


2910' 


3ECD 


4F 






8S 


'0 


2920 


: 3ECE 


56 






S 


'V 


2930' 


1 3ECF 


45 








'E 


2940 


! 3ED0 


52 








♦R 


2950. 


I 3ED1 


46 






« 


'F 


2960 


! 3ED2 


4C 








'L 


2970. 


1 3ED3 


4F 








'0 


2980 


! 3ED4 


57 






•SS 


'W 


2930s 3ED5 


03 








♦03 


30008 3ED6 


&0 






RTS 





»oor MomMK EM U MCTOBEII 



Tetefoon 01717-4535 



2290 MS VoorediolM Mi 



MGEN 1981 

HETELDORADOVOORDECOMPUTER-HOBBYIST 




IN DE CATALOGUS VERKRUGBAAf) IN DE 
TOEGANGSBEWUZEN OPGENOMEN. OE 



EN BU OE MGANG VAN OE MENBUL ZUN 2 GRATIS 
QELOT MET VOON AANSOUF VAN OE CATAUnUS 



MICRO-flDE FOR THE 6502 

Micrc-P.DE IS a Text Editor, 
ftsseftbler, DisasssftDler, or- 
iqinally a 4K versioy^ for 
the KIM', writtey^ ay Peter 
Jennincs, Our clutj' !3ecairie 
cc3yricht5 of that version. 
Gne of cur iRe^ibers, S. Woi- 
d'^iMqh nf.ade it a BK version 
*ar the KIX Afterwards ftdri 
Hankel wade it a BK J'JJ^IOR 
version. There is only a «a- 
r.jal for trte KIl», version. 
3.it no need for re-writ inc 
B «iarial esoecially for tne 
the 2K JUMGR version, Micro 
SDc r*as now coftfftancs iiKei 
PpoetKi, Blockflikove, Clear Buf 
fer, Delete Lines. Disoiay 
address/number last iine^ 
Fix Li^^e, Get Source Files, 
flooend Source Files, Print 
Svrtiboi /XREF Tables, Reset/ 
Set For« Feed Flac, Reset/ 
Set ^age Plode, Insert ;.ines. 
Chose Llne<5), List, Move 
Line (5), Muinber (renunber). 
Load ftSCII-for«at files. Set 
Lines/Screen and Lines/Paoe, 
List Memory in use, Duolica- 
te Files, Save Source Files, 
Print/Chance string, Reset/ 
Set Page-oer-Fiie/Eiect Flac 
Search Line, List " without 
Line Numbers. Save Chosen 
lines, Assetbie/Ej<ecute,Saye 
(fiCII-'fGfttat Ftlifi^&isaftsei- 
We. 



Informations about prices ttf 
Micro-ftDE cassette, Source'- 
Listino, Manual, Patches on 
KIM version, etc. ! 
Red. DE 6502 KENNER 
c/U'iHe« L. van Pelt 
2923 CK Krieoen a.d. IJssel. 
The Netherlamis. 
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KISIMtslER 



oeiB 

0820 
0030 



0070 



HEXDUn F SHEEHUYZEN CAPELLE fl/D IJSSa PflGE 01 
2000 HEXDUn ORG $2000 

«T BEHULP VftN f£T NU VOLGENDE PROGRflHHfl IS HET 
mOElUK OH HEXflDECIim DE GEHEUGENIIi«UD OP 
\€\ BEaDSCHERH EN/OF DE PRINTER UEER IE GEVEN. 
UMRBIJ PER iEOEL STEEDS 16 UNOSEN l08IBi flF- 
GEDRUKT. 

DE TOTflLE REGELBREEDTE IS 71 POSITIES. 
\€\ PROGRflHHfl m GESTflRT UORDEN DOOR NR DE 
VRAA6: 'STflRTflDRES: ' EEN flDRES WN 4 CIJFERS 
EN EEN RETURN IN TE T0ET5EN. 

flftN HET BEGIN VflN lEDERE REGEL START HET RDRES 
VftN HET ERSTE BYTE VflN DIE REGEL. 
flAN HET EINDE VflN lEDERE REGEL HORDT TEVENS DE 
\^RTflLING VflN 16 BYTES NRflR ASCII AFGEDRUKT OR 
DE LEESBflftRHEID TE VERGROTEN. 
HIERBIJ WORDEN ALLEEN DE flSCII-CHflRflCTERS flFGE- 
DRUKT UELKE VflLLEN TUSSEN DE UAARDEN (IF EN $80. 
VOOR DE OVERIGE CHRiMnERS HORDT GEN PUNT <. ) 
GEPLflflTST. 

J€T flflNTfll REGELS DAT ONDER ELKflftR UORDT flFGE- 
DRUKT IS HAXIHAflL IB, UAARNft KAN UORDEN DOORGE- 
START DOOR K RETURN-TOETS IN TE DRUKKEN. 
ER KAN VANAF EEN NIEUU IN TE TQETSEN flDRES GE- 
STflRT HORBEN DOOR EEN SfflCE IN TE TQETSEN. 

flUTEUR: F.J.H. SHEEHUIJZEN 
LIPPEDAL 19 

290A CL CflPELLE flflN DEN IJSSEL 
TEL: 010-512507 



0100 
0110 
0120 
0130 
01AB 
0150 
01E0 
0170 
0180 
01S0 
0200 
0210 
0220 
0230 
0240 
0250 
0260 
0270 



0290 
0300 
0310 
0320 
0330 
0340 
0350 



0370 
0380 
0390 



0410 
0420 
0430 

0440 
0450 



0470 



0490 
0500 
0510 
0520 
0530 
0540 
0550 
0560 
0570 



0590 
0600 
0610 
0620 
0630 
l&li 



^■1 



2000 GETKEY * $1E5A 

DUTCH ♦ »lEfl0 

flDIN ♦ $1FSD 

SPACE ♦ $1E9E 

PRTBYT * $1E3B 

CRLF * $1E2F 



2000 fl2 03 


BEGIN 


LDXIM 


$09 


• 

a 


2002 BD BE 20 


LOOP 


LOAflX 


TEKST 




2005 20 flO IE 




JSR 


QUTCH 




2008 Cfl 




DEX 






2009 10 F7 




BPL 


LOOP 




2O0B 20 B2 20 




JSR 


START 




200E 20 9D IF 




JSR 


flDIN 


• 


2011 85 01 




STAZ 


$01 


■ 
a 


2013 20 90 IF 




JSR 


flDIN 


• 
a 


201G 85 00 




STAZ 


$00 




2018 fl9 lA 




LDAIH 


$1A 


a 
a 


201fi 20 AO IE 




JSR 


DUTCH 




201D 20 65 20 




JSR 


KOP 


» 
a 


2020 20 2F IE 




JSR 


CRLF 




2023 20 2F IE 




JSR 


CRLF 




2026 AS 01 


STADR 


LDAZ 


$01 


a 
a 


2028 20 3B IE 




JSR 


PRTBYT 




2i2B fls as 




LDAZ 


$00 




2lil 21 M IE 




JSR 







PRIWEN "HEXDUHP" 



PRINT "STflRTADRES t 
INTOETSEN STARTADRES EN 
PLARTSEN OP DE ADRESSEN 
HenENUKi 

CLEAR SCRSN 

PRINT NOPiEeEL 

PRINT STfWrflDRES 



38 
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HEXDUH F SNEHUirZEN GimiE A/D IJiSEL Pfl6E IZ 



0BSB: 


203B 28 


SE 


IE 




JSR ^ACE 




KE8: 


2033 71 


X 


IE 




JSR SPACE 




K7B: 

IIUVJII* 


203G AB 


mi 

90 






LDYIH $WI 

ksW 1411 WV 


: PRINT DE INHOUD VAN DE OP 


2038 Bl 




ADRES 


LDfllY $00 


: DE WRESSEN $0000 EN $0081 


■lUiJU" 




03 

WW 






STYZ $03 


: GEVDNDEN flDRBSQi 


076)0: 

Iff IJU* 


203C 20 

mIww 


3B 


IF 




JSR PRTBYT 


s NRDR BE iiCnHlRTMIJINirM 


0710: 

Vi 111" 


203F 20 


89 


20 




JSR ASCII 


0720: 


2042 A4 


03 






LDYZ $03 




07!9I: 

111 SHI* 


2044 C8 








INY 




07^: 


2045 C0 


10 

ill 






CPYIH $10 


: KIMTROLER OF ER AL 16 GEHEUGEM- 


0750: 


2047 DO 


EF 






BNE flDRES 


: PLAATSEN ZIJN AH^RIKT 


07E0: 


2049 20 


<ji 


20 




JSR PflSCII 


: SPRING NAAR ASCII-PRINTROUTINE 


0770; 


204C K 


00 




LDAZ MB 


! VE1IIID6 DE nmS VCM MHB 


0780< 


' 204E 18 








CLC 


: IMI MET 111 


0790: 


204F 69 


10 






ADCIH $10 


0800: 


2051 85 


00 






STAZ $00 




0810: 


2053 OS 


03 






BCS INCH 


: INDIEN DE IMCUD VAN ADRES $0080 


0820: 


2055 4C 


26 


20 




JMP STADR 


: ) $F DAN DE INHOU) VAN ADRES $0001 


0830: 


2058 E6 


01 




INCH 


INCZ $01 


: HET 1 VEIMIGEN EN STOPPEN HET PRINTEN 


O8A0: 


2050 20 


5fl 


IE 




JSR GETKEY 


: m PRINTEN DOORSTARTEN INDIEN ER 


0850' 


1 2KD C9 


OD 






CHPIH $0D 


: EEN RETURN UORDT INGETQETST EN 


08GO 


1 2KF FO 


C5 






BEQ STADR 


: OPNIEUU BEGINNEN IDffilEN ER EEN 


0870' 


' 2061 C9 


20 






CHPin $20 


: ^iCE UORDT DMibtdlll 


0880 


: 2053 FO 


9B 






BEQ BEGIN 




0890 


: 2065 fl2 


06 




KOP 


LDXIH $8B 


: ROJTINE ON DE 


0900 


: 2067 ft9 


20 




SPflCEl LDfllH $20 


: KOPREGEL 


0310 


: 2069 20 


m 


IE 




JSR ma 


: AF TE DfUKKEN 


0920 


! 206C Cfl 








DEX 




0930 


\ 206D DO 


F8 






ENE SPACE! 




0940 


: 2i!£F 86 


04 






STXZ $04 




0950 


: 2071 fl6 


00 






LDXZ $11 




0960 


: 2073 8ft 






REGEL 


TXA 




0970 


: 2074 29 


0F 






ANDIH «F 




0980 


: 2076 20 


3B 


IE 




JSR PRTBYT 




0990 


\ 2079 20 


9E 


IE 




JSR SPACE 




1000 


! 207C E6 


04 






INCZ $84 




1010 


: 207E 05 


04 
IP* 






LDAZ $04 




1020 


: 2080 C9 


10 






CHPIH $10 




1030 


: 2082 FO 


04 






BEG RTS 




1040 


; 2084 E8 








INX 




1050 


: 21185 4C 


73 


20 




JHP REBEL 




1060 


: 21^8 60 






RTS 


RTS 




1070 


: 2089 C9 


80 




ASCII 


CHPIH $80 


: KONTROLER EVONDEN UAAROE OP 


118(1 


: 208B B8 


08 




BCS PUNT 


: GROOTTEi INDIEN > $80 EN ( $20 


li9B 


: 208D C3 


20 






CHPIH $20 


: DM EN PUNT OP DE BETR^FQiE 


IIBB 


: 208F 98 


04 






BCC PUNT 


: PLflRTS PRINTEN 


1118 


: 2091 20 


97 


20 




JSR PMfr 




112B 


: g8 








RTS 




113B 


: 2095 A9 


2E 




PUNT 


LOAIH $2E 


: RWJTINE OH NIET GELDIGE flSCII- 


1148 


: 2097 fl6 


03 




PPUNT 


LDXZ $83 


: CHARACTERS TE yiJZI(£N 


115B 


: 2099 95 


05 






STAZX $85 


: IN EEN PUNT 


nee 


: 209B 20 


9E 


IE 




JSR SPACE 




117B 


: 209E 68 








RTS 




1180 


: 209F 28 


9E 


IE 


PflSCII JSR SPftCE 


: ASCII-PRINTROUTINE 


iiae 


: 2Bfl2 92 


00 






LDXIH $80 




1208 


I 20fl4 B5 


05 




LQOPl 


LDAZX $05 




1218 


: 20A6 28 


m 


IE 




JSR m» 




1228 


: 20fl9 E8 








INX 




1238 


: 20Afl E8 


10 






CPXIH $10 




1248 


: 20AC 98 


F6 






BCC LQQPl 




12SB 


: 20RE 28 


2F 


IE 




JSR CRLF 




1268 


: 20B1 60 








RTS 




1278 


: 20B2 A2 


OD 




START 


□XIH $0D 




12» 


: 2184 BD 


C8 


20 


STARTl UMAX 1EKST1 
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129B: 


20B7 20 (M IE 


JSR 


DUTCH 


4 TfMla 

13BBS 


2BBh Cfl 




CTADTl 

STRRll 


1310)1 


2BBB D0 F7 


BNE 


1320: 


20BD 60 


RTS 




1330: 


2IwE 0R 


TBST » 


1340: 


20BF H) 


ss 


r 

'H 

'U 


13S0: 




'S 


1360: 


2BC1 4D 


X. 


1370: 


' 2BC2 55 




4Tniii 

1380: 


: 2BC3 44 


8 


u 


1390: 


! 20C4 58 


SB' 


1 V 
A 


1400' 


■ ^iw^e ACT 

i 2BC5 45 


S 


1C 

c 


4 A 411 

1410 


! 2BC6 48 




n 


4 ion 

1420 


! 2BC7 1h 




(ifl 

y 


14oo 


> ZBLif £0 




im 


i 2BC9 20 


8 


1 


14SB 


! 20CA 3R 




1 • 
■ 


1460 


i 2aCB S3 


m. 


'S 


1478 


i 20CC 45 


m 


'E 


148e 


: 20CDS2 


8 


'R 


1490 


: 2eCE 44 


8 


'D 


1500 


! 2eCF 41 


8 


1510 


: 20DB 2D 


8' 


1520 


: 2001 54 


8 


'T 


1530 


: 20D2 52 


8 


'R 


1540 


: 20D3 41 




'ft 


1SS0 


i 2ID4 54 


8 


'T 
'S 


ise0 


: W§ S3 


8 



IS fSS^ Sec/Hex Ubel 
2iS rcn Door J. v. loiedo 
38 REil 

40 L=S:S=i:U=a0:8=iE 

58 GDTQ 58 

G81.='l+1:S=1 

78 IF L=Q T'rtf^ GOTO 138 

SS PRIST 

^ P=L TO U STEP IE 

118 ajSUB 22S 

128 IF P{=S THEN PRIST" 

138 IF P>=i8 fiND P (188 THEK PRIST' 

148 IF P>=ltSS THEN PRIST""; 

158 IF L>S95 WEfCr® 

iSB PRIST P; SPRINT J«; 

178 &S4>l:IF S=& THES GOTO 68 

ISl NOtT P 

1S8 L=U:W=U^88:&=Q^88 
^ PRIST:PRIST 
218 GOTO M _ 
228 0=ISTt8/256) 
238 G0SU6 288 
248 J$=I$;l)=R-D*255 
258 G0S0B288 
2E8 J$=J»f 1$ 
278 RETURN 
288 E=IST(&/1&} 
238 F=I>-E*1B:H=E 
^&05UB3S8 

318 mmm^ 
mmmm 

338 IJ=IWt 
348 RETUiB4 

3S8 IF H(18 TKES H$=KI!»(STi»{H}y2>l) 

368 IF H{8 THES }»="8" 

378 IF H=18 THES m=-fi" 

388 IF H=ll THES 

338 IF H=12 THEN HJ="r 

488 IF H=13 THES H*='D* 

418 IF HsU IMBT M$=-E" 

43BRErURK 
OX 



9n\rm TO s^vE m .oad 

5mim SYl»I-BftS!C Dfllfl TftBLES. 



Het sciirijveri naar en ODhaieri 
van casssttebanc van Basic- 
orccrasijRa's is voor bezitters 
var^'esn uitgebreice JUNIOR of 
ar.dere (nachine geen enKei nro 
bleerft. De fto^itor I/O-routi- 
vies verzoroen ceze oDCrachten 
Het wordt anders als we Basic 
data van de band willen halen 
en er op willen schri.iven. 
StelJ U heeft een Basic-pro- 
o^^aftffia waarfliee U een adressen 
Sestand kunt saff-enstellen. Oo 
de Basic-cassette nr. 2 staat 
zo'n orocrajftwa: CLfilRE. ftis U 
het Drog'ra«i.ta laadt, is de 
lijst weer leeg en woet alles 
weer o:)nieuw inaevcerd. l^et 
behulp van Save and Load kunt 
'J de ingevoerde aiftSMi oo 
de band 'bewaren. 
John Bialock publiceerde 
in Wicrc The 6502 Journal van 
aoril '80 een routine om het 
saven en loaden van Basic 
I^ata Tables te verzorgen. We 
hebben deze iacHinetaal routi- 
ne aanoeoast voor JUNIOR iiet 
SYK-Basic en is, met twee de- 
aonstratieprograi/na's te ver- 
krijgen door R.5,= over te 
schrijven op giro 841433 van 



W.L. van Pelt te Krimoen a.d. 
IJssel, of op Giro 3050 van 
ce ftMRO-bank aldaar ten gun- 
ste van rekening 44.11.06.471 
t.ruv. U.L. van Pelt. 



Tot 00 heden beschikten we 
noo niet over de kennis dd 
welke wi.ize cassettebanden 
het best oer post waren te 
verzenden. 

In de Tandy cataloaus 1982 
vond Jaao van Toledo een re- 
deli ik alternatief: verzend- 
doosjes voor cassettes, zes 
doflsjes van sterk voorgevou- 
wen karton ^et adresetiket, 
De plastic cassettedoosies 
waarin cassettes worden ver- 
•<ocht kunnen er niet in ttee- 
cezonden worden. Dat scheelt 
ick irt de oortikosten, oie 
ircifientBel Fl.1,40 bedraact. 
Dy redaktie «iaakt van deze 
jifianier van verzenden al eni- 
qe tijd gebruik. Indien men 
cassettes aanbiect aan ce 
redaktie, bij voorkeur zon- 
der oahulsel'i.v.fli. retour- 
zending per Tandy-doosie. De 
doosjes Kunt U ook zelf ge- 
bruinen. Een setje van zes 
stales kost Fl.tSO. 

VSi^RIJ8BftflRf€ID BffilE 

De redaktie wordt reaei/Batic 
gevraaqd or* adressen aiwaaf 
ien Basic kan verkriioen. 
wij noteren hier onderstaan- 
df iipMMNIi 

Johnson Cowouter 
P.C. Box 523 

mim, mm um 

Ittv Bittv Cottouteps 
P.O. Box 23189 
San Jose, CA 93153 

«SB-Ver:ac 
flanaoldst rasse 10 
D-7778 Markdorf 
ii-Deutschland 

5,5K zelf-ontwikkelde Basic! 
J.J. Janssen 
6erardsweg 30 
6S25 RT Ni jMBoen 

De laatstoenoettde is ook oe- 
rechtigd FAST FOCAL te leve- 
ren. Dit is een Basic-achti- 
ge interpreter tet veei wis- 
kundiae funkties. Het is af- 
koastia van The 6502 Proaraa 
Exchanae. 2920 West i4oana. 
Reno, filV 89509, A«erica. 
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KEMMER 
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Nu we toch bezig waren i^t USR-routsresi was het pnDgraaiaa van Frans Stteehulyzen een t# 
(looi xoevai ca zoaaar voorby xe iaten 3aan. £r Koiit na^iyK een subroutine m voor die 
•^t&KfnPt* is (»i te mrien vervanten doer ewi USi-roinir^* ftwir eerst ten diar andtrt op^ 
nerkirjsen in de vor^i van wat OPboi;wende kritjek. Een Protfap» wiar 'M^i^^ 
heeft" tt^x naar »yri ssiaaK aan twee (i!ini»u» eisen voldc^n: 

1. I^t aag seen cnzinrHge invoer accepxeren. 

2. fei; sag in seen seval cp invoer reaseren set een basic fout»eldiFi9. 

i49iru OP -ege; 30 tik ik in 31 februarl 1^ of *9aat- niKs aan". Het laatste vcor- 
beeid 45 extreett, Itei eerste zeer reeei ! ftis ik op regei 6S of 1130 in tiK? 23 wanuari 
ees fotjt,?eT can voitt "?iEBQ FiW STORT* OF •REENTER". Een Enfeise fdirtnefdln^ in een 
pro9ra«»a dat ;n het ^edenands ir;Put vraaat ? Nos ge^ener i5 het offi iri te typen: l£+99 
m im Zi4Ti uit het prQ9rafar*a aet« ?DV£RFLOi< E8RQR IN 1B8. Dit ahes is te voorKoaien door 
a^tyd input te vrasen ir? str in^Si de invoer te testen en de invoer net zo iana te herhalen 
tot deze acceptabe' is, Enn voorbeeld is h^er byievoe^d. Dari een schoonheidsfoutJe: Basic 
mi een foutseidlns •'?RETUSN aiTHGuT iiOSUB ERROR". Helaas bestaat TGOSUB WilriOUT REh ERROR 
liiet. ftrhter een &3Sbf fsc^t besfist aantegev^i tuorden neat die rmitine doeti anders is het 
proaraffiy.3 zet-r .'soei'yk voor derden te lezen. Kegel b3i zai de printer we! inschakeierii zoais 
^esei 1328 dat ding weer uitschakeit. Ook hier hoort beslist een REM te staan. De Junior Ken 
IK met 20 im-w De HI printer mu mx CH8$(2£) in de Janicr ? (de OKI doet er niets 
nees letei Hi) 

3an nu de subroutine op regei 473 er^ dan voorna»e!iiK v.t«.b. het 'uitrichten'. Bat is 
:n BfiSIC een prcbl'^ett waar aiiec^n siechxe en he*e riechte csiossinsef! vo-dv bestaan. BftSIC 
drgKt getauen nu eenttaai afschuwelwK onreseistat.s af en de opiossins bestaat aityd uit een 
g!>or» sfMier m% string eKPressiesi d:e veef 'gart^e' saan veroorzaken. Gewe^dig traag» nog 
afgezler: va" ^'^r ftjstfUu-K Jrr werki^ig t'*ederi van de beruchte **garbage coMect*' routine van 
Microsoft* En USR-routine brenit hier uitKOftist. Het heie uitrichten gebeurt »et X$=ySR(Y)<of 
ml pr ]rt% IJSR(¥). Iteerd^re getai Jen norden dm Reur is onder e!Kaar ^zet zoals onderstaand 
voorbeeld laat ziens 

932593,99 «eeT Kan niet 



17.93 voor ysi7.5i7S 

De routi?>e zorgt dus voor zowei het toritiati ais voor het afronden op heie centen Het is 
«ogenJK de afrondings routine ais afzonderlUice routine te gebrulKen* V^rgeet niet in het 

prosrasHr^a de USR-vecxor te zetten* 

11 mt iMii I Rei $4C = Jsp 

12 POKE iltt 5 REM \m (18288) 

13 ^KE !2.2 s m high 
yyzig voorts: 

488 X$=USR(Y) 

m fSH 4Se-£^ vervai lert 

568 Tl=iB 



17. S3 



vcor y=i7. 55459 



Ruud UPhOff 
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3328 






?.Sa0 






2^3 
2^3 


•T- if 

* * 




^ TOF^T ROUMDED mOliNT^' * 
















1 FOR; JUNIOR KB- 3 


S12S 






2130 






2itt2 




esidimj in m mmn 




























. D£ $80.11 




Si2S 






!Six2 


FL = 2 














iOIHMNT ftSSfSb'S) 








2253 
IBi 






2272 M 


.!>; $3-2S9 






.BE $3B5F 




1^ y?3C 


M **§B9 


COPV F^C! INTO F?C2 


030S FL?ST3 


.SE 


CS'^VFl?' c.Cl ^0 S^RI-^G $01^ 






•fUL^PLY Fs^Ci Bv ' li5 






TE^PQRQfW STRING ftSEA 


8333 SE^STS 




GET STSING "a?* $21^ IN Ft:: 




.M 135® 


OFEBSTGR PLUS 


^^^^^ <»\p»j|»f|i'riie' 


.IE f2FSI 


?ILLES% KASTITY SRiOt 




.S£ $29?7 


0€CK TYPS Paf?r^«rE« 
























aSCII i^OR BLANK • 


im ZERO 




mil Fm '2 


g42i SCiESiT 




ASC!l SCIENTIFIC imriGiiO 


1438 m 


.D£ $23 


ASCii FOR fliNUS S13M 


34^3 3CT 


.0E f2£ 




2452 STREND 


.SE f2^! 


END 0*^ w^mm mm 


3463 ONE 


.D£ $ai 


Ml m 


mm 


.mm 


POSITIVE S!Q* i^^ FLP mm 




Mm 


Le?JGTH INTEGER ^'flRT FS]!f STRM 
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1511 

isa 



9m- 

1282- 

0204- 
020G- 
•217- 

0209- 

02ac- 

B2K- 

0210- 
8212- 
9214- 

0215- 
0217- 
8219- 

021B- 
021D- 
0220- 
0223- 
8226- 
8225- 



flS Bl 
F8 22 
flS B6 
48 

4S K 

20 D9 33 
06 B3 
16 ID 
25 BC 
25 BS 
25 m 
CA 

38 F5 
98 85 

A9 ei 

20 5F 3B 
20 93 3fi 
SS 



0550 

8SE8 ROUND. 
1578 



0598 
8688 

0510 
0520 

8530 SHIFT 

0640 

8658 

0550 

0570 

8580 

8698 

0788 

0718 

0720 !OWD 
0730 



2227- 3£ 55 93 
A4 88 



8758 BID 
8758 
8778 
8788 

8798 CNST 



8810 
8ES8 
1^ 



8850 
0868 
8878 



822C- 
822D- 
82^ 
8232- 
8233- 
8235- 
8237- 
823ft- 
823D- 
8240- 
B24^ 
8244- 
8247- 



18 

28 77 2B 
95 B6 
48 

A9 08 
S5 B5 
28 flF 38 
28 flF 38 
28 08 82 
fl9 27 
m 82 

28 mm 

21 IE 3B 



8898 FORfWT 

8380 

8918 

8328 

8338 

8948 

8950 

89E8 

8971 

B9BB 

8991 

IBBB 

1118 



SUBROUTINE; «U|i TD INTEGER (USR NR.; 



LDfl *FflCi 
BEQ END 
LM «FflCl->5 
PHfl 

LSR *FftCl+5 
JSR YPOC 
LDX *fflC2 
flSL *FflC2+4 
ROL *FflC2+3 
ROL *FflC2+2 
ROL *FflC2+i 
DEX 

Bfll SHIFT 
BCC NOADO 
m «ONE 
JSR FLPPLfl 
JSR INT 

STfl ♦FfiCl+5 

8TS 

CONSTANT '988 8 
. «r $9E )S6 »^ 

. By m m 



GET EXPONENT 

IF NOT ZERO, then: 

SAVE SIGdh 

ON STACK 

SET POSITIVE SIQN 

, mm m m 
GET Expoieir m r 

REPEAT! 
REHOVE- 

ALL INTEGER BITS- 
BY LEFT SHIR 
OeCREflSE lR>MQfr 
UNTIL EXPONENT MINUS 
IF FRACTION => 8.5 THEN: 

IN FflCl 
CALL FUNCTION "INT" 
ML itIGIMAL SIGN 
AND RESnfflE 
RETURN 

188 IN BINARY FLF 



FORMAT ROLiNDED flUOONT 



NULTIPLV BY 100. THEN ROUNDING. 

OFFSET 988 888 888 TO GET AL LEASING ZEROES 



CLC 


Wt m STRING WANTED 


JSR CKCKTYP 


9m PARARETER TO BE NON STRING 




ORIGINAL SIGN- 


PHA 


ON STACK 


LDA «PLS 


SET SIGN- 


STA *FACl+5 


TO PLUS 


JSR TENTIME 


HllTIPLY FflCl BY '10 


JSR TENTIME 


TWO TIfCS, HAKES '188 


JSR ROUND 


ROUND ESULT TO INTEGER 


LDfl «L,CNST 


LET Y,A- 


LDY «H,CNST 


POINT TD '988.880.000 


JS8 PLU&-3 


ADD CONSTANT AT Y/A TO FLP ACCU 


JS«aPSTR 


CONVERT FflCl 10 STRING 



LUOD'SJaMOIjAHOp'MMAA 
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im 


.El 






1030 








1040 


FORilAT STRING, HEflNUHILE REHOVINB OFFSET 300 000 000 




ttei 


mmm m m perforhed by inserting decihrl point 




1060 






224ft- A2 fll 


1070 


LOX «L,SIRINiHl 


SOURCE INDEX BEYOND FIRST '3' 


M n 


1080 


IDY «..SmiNB 


BEiTINRTION INDEX 


IJ24E- BD m m 


1090 LOOP 


LDfl STRING. X 


REPEAT: 


13251- 93 n ill 


1100 


STfl STRING, Y 


COPY NEXT CHftflftCIER 


Uffii- C9 45 


1110 


mmm 


ir ifl SemWlC NDTRRflN 


825B- F0 ^ 


1120 


BEQ ERROR 


ERROR ) 999 999.33 


1^ Em 116 


1130 


CPX IINTPJMIT 


IF 6 DIGIT'S WNE. 




1141 


BNE REAL 


wm 


aza:- as 2e 


ilSI 


LDfl m 


GET ft DOT 


82SE- CS 


im 


INY 


flOVflNCE DESTINATION INDEX 


•2SF- 93 « W 


1178 


mmmf 


AND INSERT DECIHAL POINT 


a262- ES 


1180 REAL 


m 


flDVflNCE SOURCE INDEX 


0263- C8 


1138 


INY 


flDVflNCE DESTINATION INDEX 


fl264> C3 n 


1200 


CHP«STRB«D 


CHECK FOR END OF STING 


8265- DB E5 


1210 


BNE um 


UNTIL "END OF STRING' HftRK DOIC 


0268- 68 


1250 


PLA 


RESTORE ORIGINAL SIGN 


Bm- 10 It 


1280 


m.m 


IF NEGATIVE, THEN: 


0268- (12 2D 


1278 


LDX #f!NS 


GET 


0263- D0 02 


1280 


BNE STORE 


ELSE 


^ 21 


1238 POS 


LDX «BLflNK 


GET A BLANK 


KTl- E FF M 


1300 STOSE 


STX STRING-1 


PUT SIGN BEFORE STRING 


0t74r 02 00 


1350 


LOX «L, STRING 


, INDEX TO STRING 


027B' W W n 


1360101 


LDA STRING, X 


REPEAT: ieo CHARACTER 


0279- C9 30 


1378 


CMP #ZERO 


IF LEADING mm 


027B- 00 ffi> 


1380 


BNE NOZER 


THEN 


0270- m 20 


1390 


LDft «6LftNK 


REPLACE IT 


027F- 9D W 01 


1400 


STft STRmX 


BY A Bum 


0282- £8 


1418 


INX 


m INCieiSE IN£X 


028M)0I1 - 


1430 


BNE ENDIF 


ELS 


0235- flfi 


1430 


TAX 


SET INDEX BEYQW INTEGER KHtT 


0286- E0 05 


1440 ENDIF 


CPX #INTPflRT-l 


CHECK POSITION 


0288- 90 EC 


14S0 


BCC SCAN 


UNTIL END OF INTEGER PART 


028ft- A0 00 


1500 NOZER 


LDY #-;,STRING-i 


y/A MUST POINT 


028C- m F 


1510 


LDfl «L, STRING-1 


TO SIGN BEFORE STRING 


023E-il2 0l 


1520 


LDX iSTREND 


TERHINATOR m 


0290- 20 CD 31 


1530 


JSR GETST« 


GET STRING DESCRIPTOR IN FflCl 


8233- 68 


1540 


PLft 


REMOVE OWN RETURN flDDRESS- 


1291- ffi 


1558 


PLfl 


FOR NO CHECK ON STRING FLAG 


123^60 


1560 


RTS 


m RETURN ID Htsic mmm 




1570 








1580 ERROR 


J«P ILLEG 


?ILLEGflL QUANTITY ERROR 
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VOORBEELD: INVOER STUKSPRYS 



:Pfl(£ 01 



im 

1830 

im 

1068 
107B 

im 

1090 
1100 
1118 
1128 
1138 
1148 
USB 
1168 
1178 
1188 
1198 
1288 
1210 
1220 
1231 



FOR CD=1 TO 1 
DOM 

INPUT "STUKSPRYS ";Sf 
IF S*<)'" THEN 1060 

ami 1188 

FOR 1=1 TO LEN(S$) 
R=flSC(t1ID$(S$.I)) 

0K9 AND mil m ^my m (nb) 

IF ft 046 GOTO 1118 
D0T=D0T+1 

NEXT 

CD=CD AND (D0T={1) 
CD=CD cm LEN(S$)<18 
I F NOT CD THEN 1178 
S=VflL(S$) 

CD=CD AND S= (933399.39 
eOTO 1198 

CD=0 
IF CD THEN 1210 

PRINT Qffil(t3)'Dfn' KflN ttIET"CHI»(i3) 
CD=flBS(CD) 
NEXT 
liEIUliN 



INVOER STUKSPii 
REPEflT- 
RESET PUNTEN TEiER 
INVOER STUKSPRYS 
IF- NIET LEEG 
THEM- 

: FOR- aK KflRflKTER 
TEST KflRflKTER 
NOET NUCRIBC ZVN 
IF- PUNT 
TEL ! 
NEXT- KflRflKTER 
TEST OP HftXIHflflL 1 PUNT 
VOORKOtt OVERFLOW ERROR 

if~mmmm 

CONVERTEER S$ NflflR S 

USR KflN WXIHflflL 333 333.33 flflN 

FOUT! LEGE STRING 
IF- INPUT FOUT 

pRiit mmemm 

SOHHIGE INTERPRETERS GEVEN FflLSE«-l 
UNTIL INPUT IN ORDE 



'*ro3raiii(M's fn de cassettebtbi iotheek zijn of orisiwes 
van onze ciubieden of beNerkins^ van prosrawia's Vit het 
First Book of KiM< of aiuierszins. fliie fec^t«n «n de pro- 
sraiMNi's btuven aan oe auteurs voortt^iMdnt. De kosten 
van de cassette zMn ai leers diaar kostendekkend en niet be- 
coeid OM de prosraflma's te kope<3. 

D£ CUJ8 IS e« HOia^T OEEN mm.\ 

Kostw m cassette: Ft. t2<S8i ^tn «MeTS vemid. 
Beitetien vm ne ammt mm oMave tm mm m 
mmr vatn de ca^ei^ * naw van het srsteea (^lOR/KIM) 
vereezeld van een etrobetaaikaart of (sneiier) door over- 
schruvin? OP postrekenine 841433 t.n.v. W.L van Felt te 
KriM«R jufi. Ussei. Besteiitiam vaatttt tH»jti«»ian(i ook op 
laatst^enoeMde postrettcnim. 
flndere Niizen v«> faesteu<Hi t'tift ftt«t wmViiK. 



£1 Bkterai nai +RCfl-toetsenDorc 
+!Jr:F/VHF-aoc;iilator en TV-ka- 
bel. Slles werkenc en in alu 
fliniutt les5enaarkast (3&x2Sx 
G cm), Prijs! n.o.t.k. 
Victor Krcen, Irenestraat 35 
Barencrecht. 01806 - 15814 



mm 



BRSIC CflSSETTE NR.2 





m». 


NR.KIH/&502 




mi 




KflftNUVIDiNG 




2000 


38flF 


1 


KflflNLflNDING 




2800 






QUFflNI 




2000 


ma 




OLtFfliT 




2000 


29RD 




GETflL RADEN 




2800 


231C 




GETflL RflDEN ' 




2880 


231C 


i 


ZEEGEVECHT 




2000 


2CB8 


i 


ZEEGEVECHT 




2000 


2CB8 


6' 


CLAIRE (flDRESBESTflND) 




2080 


4284 


E 


CLAIRE (flORESBESTflND) 




2000 


4284 


F 


POKER 




2000 


3flD6 


F 


POKES 




2000 


3flDS 


Q 


VIER OP EEN RIJ 




2000 


2B1I 


G 


VIER OP EEN RIJ 




2000 


2BI1 


H 


ZOEK- HET WQORD 




2000 


354C 


H 


ZOEK HET WOQRD 




2000 


354C 


I 


UQORDSPEL 




2000 


2E27 


I 


HOORDSPEL 




2000 


2E27 


J 


FflKTUUR FR.SI1tEHUIZEN 


25 


2000 


2D2F 


J 


FflKTUUR FR.SMEEHUIZEN 


25 


2000 


2D2F 



18 mm 



i SUPERSTRRTSEK (NEDERLflNDSTALZGi 2? 2000 58BF 
n aiPERSTSRTREK {*i£DE^NDS'ftLIG) 27 2000 68F 



Prus van cassette ttst hand! ei dine = Fl, l7,50| 



INHCUD 



BfiSIC CAStTTE NR. 5 



ft KRVICE WPPOSTEN BESTflND ' 2000 3D7F 

fl SERVICE RflPPORTEN BESTfll^ 25 2888 3D7F 



45 
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10 REM UITGEBREIDE ** 6 5 0 2 DISASSEMBLER 
20 REM DOOR G. V. ROEKEL 
30 REM V. D. PPlLMSTRAftT IIC 

40 REM 3135LK VLftPlRDINGEN ^„ ^ 

50 DATA"BRK-IMP", 1, "ORfi-IND, X", 2, "?", 9, "?'S9 

60 DATA"?", 9, "ORPl-Z", 2, "PISL-Z", 2, "?", 9 

70 DATA"PHP-IMP", 1, "0Rfi-IMM",2, "ASL-ft", 1, "?",9 

80 DATA"?", 9, "ORA-RBS", 3, "ASL-ABS", 3, "?", 9 

90 DATA"BPL-REL", 2, "ORA-IND, Y", 2, "?", 9, "?", 9 

100 DATA"?"t9, "ORA-Z, X",2, "ASL-Z, X",2, "?",9 

110 DATA"CLC-IMP", 1, "ORA-ABS, Y" , 3, "?",9, "?",9 

120 DATA"?", 9, "ORA-ABS, X", 3, " ASL-ABS, X" , 3, "?",9 

130 DATA" JSR-ABS", 3, "AND-IND, X", 2, "?", 9, "?", 9 

140 DATA"BIT-Z",2, "AND-Z",2, "R0L-Z",2, "?",9^,_ ^ 

150 DATA"PLP-IMP", 1, "AND-IMM", 2, "ROL-A", 1, "?", 9 

160 DATA"BIT-ABS", 3, "AND-ABS",3, "R0L-ABS",3, "?",9 

170 DATA"BMI-REL", 2, "AND-IND, Y",2, "?", 9, "?",9 

180 DATA"?", 9, "AND-Z, X", 2, "ROL-Z, X", 2, "?", 9 

190 DATft"SEC-IMP"T 1, "AND-ABS, Y", 3, "?", 9, "?", 9 

200 DATA"?", 9, "AND-ABS, X",3, "ROL-ABS, X",3, "?",9 

210 DATA"RTI-IMP", 1, "EOR-IND, X",2, "?", 9, "?'S9 

220 DATA"?",9, "E0R-Z",2, "LSR-Z",2, "?",9 

230 DATA"PHA-IMP", 1, "E0R-IMM",2, "LSR-A", 1, "?",9 ^ 

240 DATA"JMP-ABS", 3, "E0R-ABS",3, "LSR-ABS",3, "?",9 

250 DATA"BVC-REL",2, "EOR-IND, Y", 2, "?",9, "?",9 

260 DATA"?". 9, "EDR-Z, X", 2, "LSR-Z, X", 2, "?", 9 

2fi iATA"CLI-IMP". 1, "EOR-ABS, Y", 3, "?", 9, "?", 9 

280 DATA"?", 9, "EOR-ABS, X" , 3, "LSR-ABS, X",3. "?"»9 

290 DATA"RTS-IMP", 1, "ADC-IND, X", 2, "?", 9, "?'S9 

300 DATA"?", 9, "ADC-Z",2, "R0R-Z",2, "?",9 

310 DATA"PLA-IMP", 1, "ADC-IMM",2, "ROR-A", 1, "?",9 

320 DATA"JMP-IND",3, "ADC-ABS",3, "ROR-ABS", 3, "?"t 9 

330 DATA"BVS-REL", 2, "ADC-IND, Y", 2, "?",9, "?",9 

340 DATA"?",9, "ADC-Z, X",2, "ROR-Z, X",2, "?",9 ^ 

350 DATA"SEI-IMP", 1, "ADC-ABS, Y", 3, "?",9, "?'S9 

m& DATA" T » 9» "ADC-ABS, X " , 3, " ? " , 9, " ? " , 9 

W@ WTA****,!. "STA-IND, X", 2, "?", 9, "?", 9 

380 DATA"STY-Z",2, "STA-Z",2, "STX-Z",2, "?",9 

390 DATA"DEY-IMP", 1, "?", 9, "TXA-IMP", 1, "?",9 

400 DATA"STY-ABS", 3, "STA-ABS", 3, "STX-ABS", 3, "?", 9 

410 DATA"BCC-REL",2, "STA-IND, Y",2, "?",9, "?%9^ ^ 

420 DATA"STY-Z, 2. "STA-Z, X" ,J, :^STfci» I"?.!* ! ^"li « 

430 DATA"TYA-IMP*, 1, "STA-ABS, Y", 3, »TXS^IJ1P*M» "f*'^! 

440 DATA"?",9, "STA-ABS, X",3, "?",9, "?", 9 ^ „ 

450 DATA"LDY-IMM", 2, "LDA-IND, X", 2, "LDX-IMM*** tt "?", 9 

460 DATA" LDY-Z " , 2, "LDA-Z " , 2, " LDX-Z " , 2, " ? " , 9 

470 DATA"TAY-IMP", 1 » "LDA-IMM" , 2, "TAX-IMP", 1, "?",9 

480 DATA"LDY-ABS" , 3, "LDA-ABS" , 3, "LDX-ABS"* 3» "?"» 9 

490 DATA"BCS-REL", 2, "LDA-IND, Y", 2, "?", 9, "^",9 

500 DATA"LDY-Z, X",2, "LDA-Z, X", 2, "LDX-Z, Y", 2, "?",9 

510 DATA"CLV-IMP", 1, "LDA-ABS, Y",3, "TSX-IMP", 1, "?"t9 „ 

520 DATA"LDY~ABS, X", 3, "LDA-ABS, X", 3, "LDX-ABS, Y"r3» "?"»9 

530 DATA"CPY-IMM",2, "CMP-IND, X", 2, "?", 9, "?",9 

540 DATA"CPY-Z", 2, "CMP-Z " , 2, "DEC-Z" , 2, "?",9 

550 DATA"INY-IMP", 1, "CMP-IMM",2, "DEX-IMP", 1, "?",9 

560 DATA"CPY-ABS", 3, "CMP-ABS", 3, "DEC-ABS"f St "f 'S 9 

570 DATA"BNE-REL", 2, "CMP-IND, Y", 2, "?", 9, '*f«»l 

530 DATA"?", 9, "CMP-Z,X",2, "DEC-Z, X", 2, "?S9 

590 DATA"CLD-IMP", 1, "CMP-ABS, Y", 3, "?", 9, •*t"«9 

600 DATA"?", 9, "CMP-ABS, X", 3, "DEC-ABS, X"» 3, "?". 9 

610 DATA"CPX-IMM", 2, "SBC-IND, X",2, "?", 9, "?",9 

620 DATA"CPX Z " , 2, "SBC-Z" , 2, " INC-Z", 2, " ?" , 9 

630 DATA"INX-IMP", 1, "SBC-IMM",2, "NOP-IMP", 1, "?",9 

640 DATA"CPX-ABS", 3, "SBC-ABS",3, "INC-ABS",3, "?"t9 

650 DATA"BEQ-REL",2, "SBC-IND, Y", 2, "?",g, "?",9 

660 DATA"?", 9, "SBC-Z, X", 2, "INC-Z, X", 2, "?",9 

670 DATA"SED-IMP", 1, "SBC-ABS, Y" , 3, "?",9, "?"r9 

6S0 DATA"?", 9, "SBC-ABS, X", 3, "INC-ABS, X", 3, "?", 9 

690 REM EINDE TABEL 

700 PR I NT "5502 DISASSEMBLER" SPRINT 

710 CLEAR 

720 INPUT"ADRES IN DEC. OF HEX €D/H)"?A* 
730 IF A*="H" THEN GOTO 1290 
740 INPUT"GEEF ADRES LAAG EN HOOG DEC "?P,Q 
750 IF P>Q THEN GOTO 720 



LUOD'SJaMOIjAHOp'MMM 
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760 
770 
780 
7^ 
800 
810 
820 
830 
840 
850 
860 
870 
. 880 
890 
900 
910 
920 
930 
940 
950 
960 
970 
980 
990 
1000 
1010 
1020 
1030 
1040 
1050 
10B0 
1070 
1080 
1030 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 

ns0 

1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
OK 



PRINT: PRINT: PRINT! PRINT 
PRINT"ftDR-DEC DRTft-OEC flSCII 
PRINT" DftT-HEX UITVMRINQ" 
PRINT: PRINT 
FOR U=P TO Q 
M-PEEKCU) 
RESTORE 
FOR O«0 TO W 
REftD M*. H 

NEXT 0:IF N=9 THEN N"5 
PRINT U5TftBC8)?M5TftBC19) } 



ftDR-HEX-? 



1040 

TABC2B) ? J* 5 TAB C 35) 



R»U 
GOSUB 
PRINT 
D«M 

0Q8UB 1110 
PRINT I»?TRBC44)? 
IF V=0 THEN T=N 
IF V=0 THEN PRINT 
IF T=5 THEN V=4 

IF V>0 AND V=<3 THEN PRINT"*** "!l*5« ***« 
V=V+l:IF V=T THEN V»0: PRINT 
NEXT U:PRINT:PRINT 
INPUT"NOO MEER ? CJ/N) "?X* 
IF X*="J" THEN 710 

PRINT"EINDE DiSASSEMBLER" : PRINTsEND 

D=INT(:R/256) 
GOSUB 1110 
J*=I* 
D=R-D*256 
GOSUB 1110 
J$=J*+I$ 
RETURN 
E=INT(D/16) 
F=D-E*16 
H=E 

GOSUB 1200 
I*=H* 
H=F 

GOSUB 1200 
I*=I*+H* 

RETURN 

IF H<10 THEN H*=MID*(:STR*t:H), 2. 1) 
IF H<0 THEN H*="0" 
IF H=10 THEN H*="ft" 
IF H=ll THEN H*="B" 
IF H=12 THEN H*="C" 
IF H=13 THEN H*="D" 
IF H=14 THEN H*="E" 
IF H>=15 THEN H*»"F" 
RETURN 
DIM Z*<:i5) 

INPUT"GEEF RDRES LRAG EN HOGG HEX B* 
Z*(0) = "0" :Z*<: 1)=" 1" : Z*<;2) = "2" :Z*t:3)="3" 
Z*(:4) = "4" :Z*(:5) = "5" :Z*C6) = "6" :Z*C7)="7" 
Z*<:S) = "8" :Z*(:9) = "9" :Z*(:i0)="ft" 



z*a2)='."C" 

Z*<:i5)*"F" 
15 

1, i:)=z*(:i) 

2, i:>=z*(:i) 
i)=z*(:i) 



Z*C13)="D" 



THEN 
THEN 
THEN 
THEN 



fi=I 
B=I 
C=I 
D=I 



Z*(:il) = "l 
Z*C14)="E"! 
FOR 1=0 TO 
IF MID*<R*, 
IF MID*(:fi*, 
IF MID*(:fi*, 
IF MID*Cfi$, 4, 1)=Z*<I) 
NEXT I 

E=C* 1 6 : F=B*256 : G=fi*4096 ! 
FOR 1=0 TO 15 

IF mid*(:b*, 1, i)=z*(:i) then 
IF mid*(;b*, 2, i)=z*a) then 

IF MID*(B*, 3, 1)=Z*CI) THEN 
IF MID*<i*, 4, 1)=Z*CI) THEN 

NEXT I 

E=C* 1 6 : F=B*256 : G«A*4096 sQ=D+E+F+G 
GOTO 760 



P=D+E+F+G 



fi=I 
B=I 
C=I 
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ms IN LEC. DF HEX_^/H) 

8^ mm im m dog hex 



m-m 


MA-EEC 




»R40 


m-m 




iiSS3b 
45857 
4585S 


7B 

4n 
XO 

1/0 


L 


rifiAn 

B28i 
8282 


j.r 

4 

1£ 


JMP-fiBS 
4** 12 *** 

■■itft: B8 




-tr 
fO 

174 

1/0 


i 

L 


Tvv»-y 

XMUEk) 

IMVt 
D&tU 

BS85 


;.r 

(Hi 

f\r 
MC 

B8 


tfcin A fin 
jrir-M DO 

*** MC »*♦ 




1^ 






SC 




4S8&3 
^BE4 


238 
188 

232 




BBS? 
BBR 


ES 
B4 

ES 


IlC-2 

'44-^ B^ ^-'^'4' 

IHX-IWP 


4S8EB 


1S7 




BBBfi 


£8 




45857 


Z2 




SBBS 


E8 




458G8 
458E3 

nam 


45 
77 


- 


BSBC 

wm 

tNODCL 


2D 
EC 
mi 


EC 


45871 
45872 


188 
175 




B88F 
B818 


Til. 

fiF 


LD¥-2,X 


45873 


227 




8811 


E3 




4S874 
45875 


182 
255 




S812 


A2 
FF 


LDX-Illfi 
mm FF 4°^ 


4S87& 


154 




BB14 


S8 


TXS-IHP 


45877 


232 




BSIS 


ES 


»8-II8> 


45878 


234 




IKS 


» 


SDP-IHP 


1^ 


214 




IB17 


ER 


WP-IHP 


45888 
45881 


134 
233 




MS 
8813 


88 
EF 


STX-2 
EF ^ 


45882 
45884 


142 

13 

1 




SH 

mc 


8E 
13 
81 


STX-fiBS 
13 

SI 


45885 
4^8 


134 
227 






88 

E3 


STX-Z 


45887 

45888 
458S3 


IM 
31 

4 
1 




B81F 
BB21 


8E 

IF 

m 


STX-flBS 
Mi 


45SS8 
45831 


142 
73 

•nr 


Q 


BB24 


SE 
Iff 

in 




45833 
45834 
45835 


nrrc 

223 






£8 
ES 


JSR-ftSS 
^ EB ^ 
ES 




all-round 



All-round Systemen Nederland B.V., Stationsweg 23, 2182 BA Hillegom 
postbus 212, 2180 AE Hillegom. tel. 02520-19544. telex 41443 aliro nl. 

WIJ LEVEREN SNEL EN TEGEN ZEER CUNSTICE PRIJZEN: 

Diskettes 

van verschillende merken zowel 8" als 5i". Tevens formatted en 
cleaning dikettes. 

Papier 

voor kleingebruikers leveren wij dozen van 1000 vel 38 cm. 

Inktlinten 

linten en kassettes voor alle gangbare printers. 

Computermeubilair 

o.a. ideate tafeltjes om een kompleet micro systeem op te plaatsen. 

Data -safe s 

een mini safe voor 80 x 5i", of 30 x 8" diskettes. 

Opbergsystemen 

o.a. voor diskettes, tapes, kassettes en alle maten output. 

Geluiddempende kappen 

brengen het geluid van uw printer 75 tot 90% terug. 

Alles voor uw computer 



^ all-round ^ 



www.dottyflowers.corn 
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COmPRCT COmPUTER 



De PROTON Compact-Computer is modulair'tjpgebouwd, zodat een systeem 
op maat kan worden samengesteld, cftt achteraff bnbeRerkt uitbreidbaar is. De 
naam Compact-Computer' is geep loie kreet: binner/een keyboardbehuizing' 
kan een zeer kompleet microcomputersyste^m worden samengesteld. Zoals uit 
ondervermelde specificaties blijkt is bij ^e PROTpN Compact-Computer niet be- 
spaard op flexibiliteit, kwaliteit en technische^ogelijkheden. 
Nu de Compact-Computer ook in bouwpakkel-^orm wordt'geleverd, komt deze 
ook binnen het bereik van de electronica-hobbyLst die hoge eisen stelt binnen een 
beperkt financieel budget. Voor een probleemloze bouw is soldeerervaring w<^l, 
essentieel. De bouwpakket-vorm heeft ook als v.oordeel, dat de Compa^^ia|j||ij 
ter in fasen kan worden opsiebouwd. ' ' Miiir'^iifir^^i^^B 



Behuizing 

In de fraale, compacte (43 x 22 x 3 ... 7 cm) ^ 
behuizing kunnen, naast het keyboard, 
alle onder vermelde boards worden ingebouwd. 
De behuizing is zeer solide - 5 mnn ABS - Alle 
boards kunnen met parkers simpel worden be- 
vestigd. Alle uitsparingen en montagepunten 
zijn al aanwezig, dus de bouw is probleemloos. 

Bestelnr. BPC / 85,~ 

Keyboard 

Dit topklasse keyboard heeft 91 toetsen, waar- 
onder 1 6 functietoetsen en een decimal keypad 
met 1 2 toetsen. Levensduur 1 0 miljoen schake- 
lingen! De switches worden gemonteerd op een 
voorgeponste stalen montageplaat, waardoor 
op de printplaat geen mechanische kracht wordt 
uitgeoefend. Bestelnr. KB-1 -PC / 245,.- 

Floppy-disk-controller 

Geschikt voor max. 4 drives. Uitgevoerd met 
dataseparator. Het snelle' DOS (Disk Opera- 
ting System) wordt op een Dysan 5V4" diskette 
meegeleverd. Bestelnr. FDC4-PC / 485,- 

Floppy-disk-drive 

Capaciteit 400K (geformatteerd!) Qume-kwali- 
teit. 5V4" slim-line (halve hoogte!) aanzienlijk 
sneller (track-to-track 6msec.) 

Bestelnr. FDD-2 / 995,- 

HOE TE BESTELLEN (partikulieren) 

1) vooruitbetaling (geen adm kosten - / 9.50 verzendk ). 
per postgiro nr 27 79 91 1 of Amrobank Hilversum nr. 44.91 03 927 
t n V Post Electronics, Energiestraat 36. Naarden. 

2) onder rembours (geen adm kosten - 
/ 12.50 verzend- en rembourskosten) 



^^^^^^^^■F^ Microprocessorboard T §@U^. 

^m^^^^^^^^^ Dit 'hart' van het systeem bevat ' 

^^^^^^^^^^ de 6502 microprocessor, een 6522 \ { 

^^^^ VIA (1 /O - IC)-vrij voor degebruiker-, [ 

zeer flexibele memory-mapping met f — 
Schottky-PROM,6K monitor in PROM en iL g^ 
een 1 0K BASIC - interpreter/compiler in PROM ■■>•■ ■•/ t ' 

met unieke faciliteiten: full-screen editing, gebruik van 'label's' (b.v. GOTO # 
BEGIN) en een hoge snelheid doordat alle sprongfunkties worden gecompileerd. 
2 socket's voor max 16K PROM/RAM zijn vrij. De bus is op flatcable-konnektors 
uitgevoerd. I .p. v. de 6502 is het ook mogelijk de 6802, 6809 of Z80A toe te passen 

Bestelnr. ^uPB 65 / 395,- 

Grafisch videoboard + High-speed cassette interface 

High resolution graphics: 576 x 229 dots, programmeerbaar aantal karakters/ 
regel en regels/scherm (max 25 regels van elk 80 karakters), max 8 kleuren. TV- 
uitgang + monitor uitgang. Dit summum op videogebied is ondergebracht op 2 
boards. Tevens is voorzien in een high-speed (10K byte/minuut!) cassette-inter- 
face Bestelnr. GVC-2 / 375,-- 

- als low-cost alternatief voor het videoboard is een 1 6-karakter alfanumeriek dis- 
playboard beschikbaar. Bestelnr. AD16 / 145,- 

- de cassette interface is ook als apart board (b.v. als 2e interface) leverbaar. 

Bestelnr. HOI / 25,-- 

64K RAM + ACIA + printerport 

De (dynamische) 64K RAM is zowel aaneensluitend als in 2x 32K te gebruiken. 
De ACIA (serieel communicatiekanaal vlgs RS232-norm) is met dipswitches in- 
stelbaar op een Baudrate van 50 .. 19200 en is uitgevoerd op een 25 p. delta- 
konnektor. De Centronics-interface is uitgevoerd op een 'echte' microribbon 
konnektor. Op de print is de mogelijkheid voorzien een (vertikaal) busboard te 
monteren voor toekomstige verdere uitbreiding. Bestelnr. DR64AP / 590,-- 



HOE TE BESTELLEN (bedrijven. instelingen) 

1 ) per vooruitbetaling of onder rembours (zie part ) 

2) op rekening (schriftelijk of per telex) 

Adnn kosten beneden / 250.- . / 12.50. verzendkosten / 9 50 

Alle prijzen inci. btw Leden 20% korting 
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